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Venimos observando, con creciente 
disgusto, en esta redacción que uno 
de los rotativos de mayor difusión 
en el país omite sistemáticamente 
(cuando no ataca con saña) al 
standard MSX. 

Y esto no es flor de un día. No 
sabemos si este hecho bien patente, 
que seguramente habrán observado 
muchos de nuestros lectores, 
obedece simplemente a un 
desconocimiento profundo del 
panorama informático español o 
bien a una encubierta maniobra de 
tipo promocional que pretende 
hacer comulgar con ruedas de 
molino a futuros usuarios 
de microordenadores para que se 
decidan por la adquisición de 
micros que "fueron pero ya no 
son", aunque su nombre siga 
sonando o bien a hacerles comprar 
ordenadores domésticos que nunca 
han tenido un nombre relevante. 
No podemos hacer otra cosa que 
lamentar tal actitud, y desde nuestra 
tribuna, advertir a nuestros lectores 
acerca de esa tergiversación de la 
realidad. 

De todos modos, los usuarios de 
MSX saben suficientemente bien 
que disponen de un aparato que 
-hoy por hoy, y a nivel de 
ordenadores domésticos- 
no tiene nada que envidiar, sino 
todo lo contrario, a cualquier otro 
ordenador de su categoría. 
Por tanto, este editorial no va 
dirigido a los poseedores de MSX, 
sino a quienes estén intentando 
decidirse por la compra de uno 
u otro micro. A todos ellos 
hemos de decirles que si desean 
información objetiva no se 
remitan a los periódicos, sino 
que pregunten a los usuarios. Si 
proceden de este modo, estamos 
seguros de que el parque MSX 
todavía crecerá más. 
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¿Cómo puedo conseguir 
mediante una o varias órde- 
nes que el ordenador ejecute 
un RESET, como si se pulsa- 
se la tecla RESET o se apa- 
gase y encendiese el ordena- 
dor? 



Nicolás Viches Cres] 
HUEL 



sno 
VA 



Conseguir un RESET des- 
de un programa es algo muy 
fácil de conseguir. Esto lo sa- 
ben aquellos que empiezan a 
programar en ensamblador. 
Para conseguir un RESET 
sólo has de saltar a la direc- 
ción cero de memoria. Para 
lograr esto has de escribir la 
siguiente línea: 
DEFUSR = 0:A=USR(0) 




La Isla de! Tesoro. 



LA ISLA DEL TESORO 



Tengo el ordenador HIT- 
BIT HB-75P de Sony y qui- 
siera saber si el juego "La 
Isla del Tesoro" está dispo- 
nible en cassette o cartucho 
y su precio y cómo podría 
.adquirirlo. 

Enrique Cuenca Rodrigo 
Moneada (VALENCIA) 

El juego "La Isla del Teso- 
ro" se encuentra únicamente 
en versión MSX-2, por lo que 
no podrás utilizarlo con tu or- 
denador ni con cualquier otro 
de la primera generación. El 
juego, debido a su gran tama- 
ño, se encuentra únicamente 
en versión de disco de 3 pul- 
gadas y media. Lamentamos 
que este interesantísimo jue- 
go no funcione en tu ordena- 
dor. 



En el proceso de un pro- 
grama que estoy realizando, 
me ha surgido una duda res- 
pecto a cómo dibujar una 
elipse con la instrucción 
CIRCLE inclinada 45 gra- 
dos con respecto a la hori- 
zontal. 

Manuel Risco Pérez 
Pueblonuevo 
(CORDOBA) 

Debemos hacerte saber 
que no es posible dibujar una 
elipse inclinada por medio 
del comando CIRCLE. Para 
ello debes utilizar las fórmu- 
las trigonométricas de la elip- 
se, que te incluimos a conti- 
nuación. Debes incluir la fór- 
mula en un FOR. . . NEXT de 
0 a 2*pi haciendo el STEP 
que desees según la resolu- 
ción que desees. 
FOR 7 = OTO 2*Pl STEP 

X = centro_X+(COSU)* 
radiojioriz) 

Y = (centro_Y+(SIN(i)* 
radio_vert))*4/} 
instrucción_de^dihujo 
NEXTI 



CASSETTES MSX 



¿Dónde podría obtener 
una amplia gama de casset- 
tes para MSX? 
Juan Sebastián de Izaguírre 
Donostia (GUIPUZCOA) 

En el mercado del softwa- 
re MSX se producen cambios 
constantemente, por lo que es 
muy difícil estar al día de to- 
das las novedades que apare- 
cen en el mercado. Sin em- 
bargo, en nuestro "Especial 
Software" publicamos una 
completa lista con todo el 
software existente en el mer- 
cado MSX antes de cerrar di- 
cho número. En el "Especial 
Software" se incluyen tam- 
bién las direcciones de los dis- 
tribuidores de software para, 
de este modo, dirigir vuestros 
pedidos y consultas directa- 
mente a ellos. El "Especial 
Software" puedes conseguirlo 
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DISCOS E IMPRESORAS 



Les agradecería se sirvie- 
sen indicarme qué tipos de 
unidades de disco o de im- 
presoras puedo acoplar a mi 
ordenador SVI-728 MSX. 

Juan Manuel Elices 
Mondragón 
(GUIPUZCOA) 

Trataremos en primer lu- 
gar las unidades de disco. Por 
ser tu ordenador un MSX 
puedes conectarle cualquier 
unidad de disco. Sin embar- 
go, para ello debes utilizar el 
conectar de cartucho situado 
en la parte superior de tu or- 
denador. Puedes también uti- 
lizar la unidad de disco Spec- 
travídeo, permitiéndote en 
este caso utilizar el conectar 
especial situado en la parte 
posterior de tu ordenador. Es 
esta la única ventaja de esta 
unidad, ya que te permitirá 



utilizar con la unidad de dis- 
co conectada el slot para car- 
tucho que queda libre. 

En cuanto a impresoras, 
puedes conectar a tu ordena- 
dor cualquier impresora que 
siga la norma Centronics (el 
99% de las existentes en el 
mercado). Sin embargo pue- 
des tener algún problema si 
la impresora no es MSX, ya 
que. alguno de los caracteres 
del ordenador pueden no 
aparecer impresos en este 
caso, o bien que algunos pro- 
gramas no reconozcan la im- 
presora. 

Si no buscas una impresora 
con altas prestaciones te reco- 
mendamos te encamines ha- 
cia una impresora MSX, ya 
que con cualquiera de las 
existentes conseguirás tus 
propósitos a la perfección. 



dirigiéndote a nuestro depar- 
tamento de números atrasa- 
dos. 



SLOTS EN EL TOSHIBA 
HX-20 



Hace cuatro meses adqui- 
rí un Toshiba HX-20 y he 
notado que, al cargar algu- 
nos programas se me blo- 
quea el ordenador, con jue- 
gos como DAMBUSTERS, 
REVENGE GROG. Llamé 
al servicio oficial y me dijo 
que el ordenador está bien, 
que al tener procesador de 



texto le impide ejecutar al- 
gunos programas. ¿Es eso 
cierto? ¿Se puede evitar con 
un cartucho de ampliación? 

Carlos Beltrán 
Alcorcón (MADRID) 
La respuesta del servicio 

Toshiba XH-20. 
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AVISO 
IMPORTANTE 



Ya sabéis que la tónica 
que mantenemos es daros 
el máximo apoyo, lo que 
queda bien patente tanto 
en los artículos de estas pá- 
ginas como en la sección 
destinada a correo del lec- 
tor. 

Precisamente por ello, 
os pedimos que realicéis 
vuestras consultas por co- 
rreo. Si el teléfono no para 
de sonar en nuestra redac- 
ción -como viene suce- 
diendo últimamente— per- 
demos un tiempo precioso 
en responder vuestras con- 
sultas individualmente, 
mientras que cuando son 
contestadas a través de la 
revista, una sola respuesta 
sirve para toda aquella gen- 
te que tenga el mismo o si- 
milar problema. Todos sa- 
bemos lo molesto que es 
quedarse atascado cuando 
se está desarrollando un 
programa, o las ganas que 
se tienen de verlo funcio- 
nar tras haberlo tecleado. 
Pero hemos comprobado 
que la mayoría de atascos 
son producto dé la precipi- 
tación por lo que os roga- 
mos que apliquéis la norma 
de oro que reza: antes de 
telefonear tiay que refle- 
xionar. 

Con respecto a los pro- 
blemas de listados, podéis 
solucionarlos vosotros mis- 
mos aplicando el test de lis- 
tados y en cuanto a los pro- 
gramas que desarrolléis vo- 
sotros, poco os podemos 
ayudar si no los tenemos a 
la vista. 

Así pues, apelamos a 
vuestro buen criterio para 
solucionar este enorme 
problema de colapso tele- 
fónico que estamos su- 
friendo. 

Por ello, y lamentándolo 
mucho, a partir de ahora, 
atenderemos telefónica- 
mente sólo las consultas de 
programación verdadera- 
mente indispensables. 
Ayudadnos un poco: si te- 
nemos más tiempo las re- 
vistas salen mejor. 

MANHATTAN TRANSFER, S.A. 



oficial puede ser totalmente 
correcta; pero la culpa no es el 
ordenador. Repetimos por 
enésima vez que la dejadez de 
ciertos programadores lleva 
de cabeza a muchos usuarios 
de MSX, ya que son los pro- 
gramadores los que no siguen 
las normas del estándar 
MSX. 

Este tipo de errores no son 
siempre solvenlables; pero, 
ciertamente, en algunas oca- 
siones se soluciona con una 
ampliación de memoria. Para 
darte una respuesta más con- 
creta deberíamos conocer la 
disposición de los bancos de 
memoria, información que 
con toda seguridad debe estar 
incluida en el manual de ins- 
trucciones de tu aparato. 



LEYENDO... GRABANDO.. 



¿Tengo un ordenador 
Philips VG-8020 y he nota : 
do que cuando grabo pro- 
gramas (del ordenador a la 
cinta) el cursor se pierde 
hasta que sale Ok. ¿Por qué 
en otros ordenadores salen 
mensajes como "Press 
PLAY & RECORD' y en 
éste no? ¿No son los mismos 
los comandos? 
José Luis Jiménez Moreno 
MALAGA 




En primer lugar aclararte 
que el modo de grabación es 
el mismo en todos los MSX. 
Este mensaje puede haberte 
aparecido en otros ordenado- 
res que no son MSX. En el 
fondo este detalle radica en 
una elección a la hora del di- 
seño del ordenador. ¿Porqué 
unos ordenadores son grises, 
otros blancos, otros ne- 
gros...? 

En los MSX se han supri- 
mido estos mensajes por una 




MUSICA MSX 



Estoy intentando hacer 
un programa de música; 
pero me es totalmente impo- 
sible, ya que una vez que he 
cambiado !a forma y el tono 
no sé volver el sonido a la 
posición inicial. Les rogaría 
me informasen de cómo 
puedo devolverlo a su posi- 
ción inicial y cómo puedo 
reproducir el sonido de los 
instrumentos más importan- 
tes, como la guitarra, la 
trompeta, etc. 

Raúl Solé Pastor 
Premia de Mar 
(BARCELONA) 

Una vez haz modificado la 
forma de la envolvente me- 
diante los comandos "S" y 
"M" del macrocomando 
PLAY, o bien mediante la 
instrucción SOUND es fácil 
recuperar el formato inicial 
de la envolvente. Para ello 
sólo debes hacer PLA Y "V8". 

Mediante este comando 
modificas el volumen "Y' co- 
locándolo al nivel 8 de forma 
constante. Como los coman- 
dos "S" y "M" modifican la 
envolvente mediante varia- 
ción del volumen (amplitud) 
este sencillo comando te de- 
volverá el sonido inicial, sin 
ningún tipo de envolvente. 
El volumen 8 es el habitual- 
mente usado por el BASIC; 
pero puedes utilizar cualquier 



otro según desees. 

Respecto a ti 
cuestión, es algo más compli 
cada. El timbre de cualquier 
instrumento no viene única- 
mente determinado por la en- 
volvente de su onda sonora 
(que es lo que podemos modi- 
ficar desde el BASIC). Es de 
vital importancia la suma de 
armónicos (ondas fundamen- 
tales) que lo componen. Imi- 
tar este comportamiento es lo 
suficientemente complicado 
como para intentar abstener- 
nos de ello en lodo lo posible. 
Existen dos soluciones alter- 
nativas, ninguna de ellas sen 
cilla. La primera de ellas con 
siste en hacer vibrar el alta- 
voz directamente, mediante 
"1" y "0", conexión y desco- 
nexión. Si esto lo realizas des- 
de el ensamblador podrás ge- 
nerar cualquier sonido modi- 
ficando adecuadamente la 
frecuencia de vibración en 
cada instante. Es así como se 
consiguen los efectos de voz 
digitalizada en muchos pro- 
gramas. 

El segundo método consis- 
te en variar la forma de la en- 
volvente según la duración de 
cada nota. Esta tarea es muy 
laboriosa; pero puede llevar- 
se a cabo con éxito desde el 
BASIC. Los resultados, que 
no podemos calificar de "alta 
fidelidad' son, si 
muy interesantes. 



causa muy simple. El ordena- 
dor puede utilizarse con cual- 
quier aparato de cassette, y 
esto le obliga a perder parte 
del control sobre él. En los 
ordenadores que utilizan cas- 
settes especiales, Spectravi- 
deo SV-328 y 318, Commo- 
dore, Amstrad, etc. es posible 
este mensaje, ya que el orde- 



nador puede saber en todo 
momento si la cinta está ro- 
dando o no, que botones es- 
tán pulsados, etc. La no exis- 
tencia de este mensaje en la 
grabación, no es, sin embar- 
go, ningún problema grave. 
Sólo has de recordar que, 
cuando deseas grabar has de 
pulsar PLAY & RECORD 
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PCversusMSX-2 

Los MSX de primera ge- 
neración son, hoy por hoy, 
la elección indudable como 
ordenador doméstico; pero, 
ante la baja de precios de los 
compatibles IBM se me pre- 
senta un dilema, ¿MSX de 
segunda generación o PC? 

Aunque apareció en su re- 
vista, todos los expertos en 
informática han negado la 
aparición del X'PRESS 16 
compatible MSX-PC, ya 
que su comercialización no 
es posible debido a los gran- 
des problemas técnicos que 
surgen en su funcionamien- 
to. 

Juan (i riera i Monillo 
SabadeU (BARCELONA) 

Tu primera pregunta es fá- 
cil de responder, aunque a 

les pueda resultar difícil. Am- 
bos ordenadores se dirigen a 
mercados potencialmente di- 
ferentes. Los ordenadores PC 
(Personal Computer) se diri- 
gen al mercado personal, es 
decir, a pequeñas empresas o 
profesionales liberales qug 
desean llevar una pequeña 
gestión personal. Dada la 
enorme cantidad de software 
existente en el mercado PC 
existen aplicaciones científi- 
cas, estadísticas, de gestión, 
etc; pero, como se ve, muy 
alejadas del ambiente fami- 
liar. 

Los ordenadores MSX, in- 
cluidos los de segunda gene- 
radón, son ordenadores do- 
mésticos, es decir, dirigidos al 
mercado familiar. Sus princi- 



pales características son la 
amistosidad, los gráficos y el 
sonido. Sus principales apli- 
caciones son la educación, el 
ocio, y la gestión doméstica. 
Ambos aparatos distan enor- 
memente, y sería estúpido 
pretender imponer los MSX 
en el mercado personal, en el 
que nada tienen a hacer por el 
momento. Piensa, sin embar- 
go, que los PC no disponen 
de buenos gráficos, ni de so- 
nido (excepto un muy desa- 
gradable zumbido que cam- 
bia de tono), ni de todas esas 
características que hacen de 
los MSX-2 los mejores orde- 
nadores domésticos existen- 
tes en la actualidad. 

Respecto a tu segunda 
cuestión hemos de aclararte 
que el Speclravídeo X'PRESS 
16, no sólo está en el merca- 
do, sino que fue una de las es- 
trellas del pasado INFOR- 
MAT-87 celebrado en Barce- 
lona a principios de marzo. 
Evidentemente los expertos 
en informática a los que te re- 
fieres no lo son tanto, o están 
muy mal informados. Res- 
pecto a las dificultades de un 
ordenador doble-compatible 
son grandes; pero solventa- 
bles. Existe un importante 
precedente gracias a VIC- 
TOR COMPUTERS, que co- 
mercializó hace un par de 
años el primer ordenador do- 
ble-compatible, que compati- 
bilizaba sus ordenadores 
VICTOR 9000 con los com- 
patibles IBM. Hemos de re- 
saltar el enorme esfuerzo rea- 
lizado por Spectravídeo para 
desarrollar este extraordina- 
rio PC que, mediante un mó- 
dulo especial, permite utili- 
zar todos los cartuchos de 
MSX. 




VAMPIRE.AyudaaJaudAzGulllermoaaallr 



LORD WATSON. EsM es un juego muy original 




HARD COPY. Para copiar pantallas. Tres 
formatos de coplas, simulación por blanco y 
sprites, redeflnlc. de colores, 
on todas las Impresoras ma- 




TEST DE LISTADOS. El segundo programa de 
la Serle Oro es el útilísimo Test que te permi- 
tirá controlar la corrección de los progra- 
mas que copies de MSX CLUB y MSX EXTRA 
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r '" _.'^H CON GARANTIA 




tripleto programa de SNAKE. Entretenido y muy divertido juego 
ca de la liga, de los en el que Snake procura comer unos nume< 
n de boletos. Acertar ros que la engordan Tanto las murallas que 




EL SECRETO DE LA PIRAMIDE. Atrevido 
Juego de aventuras a través de los mlBterlos 
y peligros que encierran los laberínticos pa- 
sillos de una pirámide egipcia. ¡Atrévete si 



STAR RUNNER. Conviértete 
piloto interestelar y lucha a muerte, a 
través del íuperespacio, contra las defen- 
sas del Urano Daurus. Dos pantallas y 
cinco niveles de dificultad. PVP. 1.000 pts 



FLOPPY. El Preguntón. Un verdadero desafio 
a tus conocimientos de Geografía e Historia 
española Floppy no perdona y te costara 
mucho superarlo PVP 1 000 Ptas 



MAD FOX Un héroe solitario e 
una carrera a vida o muerte por un desierto 
plagado de peligros. Conseguir el combusti 
ble para sobrevivir es su misión Diez niveles 



Slquleresreciblrpor corro certificado MtascawettM garantiMiasrecortao copla este boletín y envíalo hoy mismo: 
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□ LORD WATSON 



Ptas. 500- 
Ptas. 700- 
Ptas. 700,- 
Ptas. 2.600- 
Ptas. 1.000,- 



□ SNAKE 

□ EL SECRETO DE LA PIRAMIDE 

□ STARRUNNER. 

□ TEST DE LISTADOS 

□ MATA MARCIANOS 



Ptas. 600,- 
Ptas. TOO,- 
Ptas. 1.000,. 
Ptas. 500, 
..Ptas. 900, 



G FLOPPY 

□ MADFOX _ 

□ VAMPIRO 

□ SKYHAWK 

□ TNT 



fastos de envío certificado por cada cassette Ptas. 70,- Remito talón canearlo de Ptas a la orden de Manhattan Transfer, SAj 

ATENCION: Los suscriptores tienen un descuento del 10% sobre el precio de cada cassette. 

IMPORTANTE: Indicar en el sobre MSX CLUB DE CASSETTES. ROCA I BATLLE, 10-12 BAJOS. 08023 BARCELONA 

Para evitar demoras en la entrega es imprescindible indicar nuestro nuevo código postal. 



NUESTRAS CASSETTES NO SE VENDEN EN QUIOSCOS. LA UNICA FORMA DE ADQUIRIRLAS ES SOLICITANDOLAS 
A NUESTRA REDACCION. ¡NO SE ADMITE CONTRA REEMBOLSO! 



Tablón de anuncios 



Esta sección de MSX CLUB es de nuestros lectores. Todos ellos tienen derecho a dos inserciones totalmente gratuitas. Las características 
de esta sección no permiten la inclusión de anuncios con fines de lucro. Advertimos que la desprotección y copia de software original es 
un acto delictivo perseguido por la ley. 



Vendo videojuegos Philips G- 
7000 con seis cartuchos de jue- 
gos por 10.000 Ptas. Santi San- 
doval. Rbla. Justo Oliveras n.° 
69. Hospitalet. BARCELONA 

Vendo cartuchos de Konami: 
A. Land, H. Sport I, Tennis, 
cada uno 4.000 Ptas. y los tres 
11.000 Ptas. También vendo 
joystick Sanyo por 3.200 Ptas. y 
otro Aristón por 1.000 Ptas. M. 
Garrido Pareja. Tlf : (968) 22 28 
52.Bib-rambla22 1° GRANA- 
DA. CP.l. 

Vendo ordenador Sony HB- 
75P de 80 Kb, poco uso, cables 
de conexión y manuales y va- 
rios programas comerciales por 
40.000 Ptas. Gustavo Cela. Tlf: 
21 67 93. C/. Poeta Cabanillas 
n.° 10-12 piso 3° izq. 27004 
LUGO. CP.l. 

Vendo Spectravídeo 328, ex- 
pander 605B, varios programas 
en CP/M (WordStar, CalcStar, 
ReportStar, Data, Contabili- 
dad), y monitor de fósforo ver- 
de. Alberto Navarrete. Tlf.: 
(91)255 06 55. CP.l. 
Cambio 25 juegos, 10 cartu- 
chos y el resto originales en cin- 

Busco Green Beret, Jail Break y 
Nemesis. Mis 25 juegos por es- 
tos tres. Luis Escudero García. 
Casablanca 1 1 . 04740 Roquetas 
de Mar. ALMERIA. CP.l. 
Vendo Joystick Quickshot II, 
precio a convenir. Angel Peña. 
C/ O. Basulto 95. Torreperogil. 
23320 JAEN. Tlf.: (953) 77 60 
24. CP.l. 

Cambio tres juegos. Zaxxon, 
Chiller y Speed King originales 
por Gunfright (original). Ma- 
nuel Romeu. C/ M.' Rosa Mo- 
les n.°27, 1° 1.'. 43500 Torto- 
sa. TARRAGONA. CP.l. 
Compro cartucho de amplia- 
ción de memoria para ordena- 
dor Sony MSX. José Fernando 
López. Tlf.: 21 08 63. ZARA- 
GOZA. CP.l. 

Vendo juegos originales a 300 
Ptas. También vendo cartuchos 
Konami originales por 2.000 
Ptas. Estoy interesado también 
en una ampliación de memoria. 
Paco. Tlf: (958) 66 08 47. 
CP.l. 

Vendo Sony HB-55P con am- 
pliación de memoria de 64 Kb y 
muchos programas por 35.000 
Ptas. Angel Lafuente Esteban. 
C/ Alférez Provisional, 1, 4.° 
42003 SORIA. CP.l. 
Vendo Philips VG-8000 de 48 



Kb con manuales en castellano, 
10 programas comerciales, más 
de 20 revistas MSX CLUB, ca- 
bles de conexión, procesador 
de textos y hoja de cálculo, 
todo comprado hace un año. 
Todo por 36.000 Ptas. (discuti- 
bles). Fernando Alabán Albe- 
ro. Virgen de Guadalupe 13, 
2." Iz. Villena. ALICANTE. 
Tlf.: (965) 80 38 33 y 80 47 70 
CP.l. 

Vendo HIT-BIT 55P con ma- 
nuales en castellano, cables, 
etc. Precio a convenir. Pablo 
Gil. Tlf: (986) 27 49 57 a partir 
de las 8 de la tarde. Vigo. PON- 
TEVEDRA. CP. 1 . 
Vendo Booga-Boo y Time 
Curb a 2.500 Ptas. Escribir a: 
C/ Belinda n." 5. Montaña los 
Vélez ( Agüines). Gran Canaria. 
35259. CP.l. 

Vendo Philips VG-8000 MSX 
de 32 Kb y expansión de 16 Kb, 
cables, libro ae manejo y varios 
programas. Todo por 30.000 
Ptas. José Manuel Vera Vil- 
ches. C/ Escritor José de los 
Heros n.° 3. 14014 CORDO- 
BA. Tlf.: (957) 25 47 24 ó 27 48 
67. CP.l. 

Cambio MSX Código Máquina 
de la editorial DATA BECKER 
por otro libro de la misma co- 
lección o lo vendo al precio de 
1.800 Ptas. Javier Hernández. 
Tlf.: 242 99 44. S.Jerónimo 24. 
08001 BARCELONA. CP.l. 
Vendo ordenador Philips MSX 
VG-8020 de 80 Kb, sin estre- 
nar, por sólo 25.000 Ptas. Da- 
vid Altafaja Albert. Tlf.: 21 1 85 
95. BARCELONA. CP.l. 
Vendo MSX con cartucho de 
16 Kb y Spectrum + con inter- 
face Kempston con programas, 
libros, revistas, etc por 20.000 
Ptas. cada uno. Alfonso Mon- 
toya Albax. ALMERIA. Tlf: 43 
16 12. CP.l. 

Vendo superexpander con do: 
discos para SVI-328 por 75.00C 
Ptas. cartucho de 80 columnas 
por 15.000, monitor f. verde 
por 17.000. Regalo DBASE II, 
WORDSTAR, etc. Venancio 
Gancedo. Tlf.: (942) 33 98 69. 
SANTANDER. CP.l. 
Vendo 10 programas MSX ori- 
ginales por sólo 2.400 Ptas. Hy- 
per Sports III, Sweet Acorn, 
etc. Teresa Martín. C/ Villaba- 
ñez, 26. 47320 Tudela de Due- 
ro. VALLADOLID. CP.l. 
Vendo Sony HB-101P, 20 jue- 
gos comerciales y cassette espe- 
cial para ordenador por 30.000 



Ptas. David. Tlf.: (958) 12 32 
15 (horas comida). GRANA- 
DA. CP.l. 

Compro juego Atlethic Land o 
bien lo cambio por uno de es- 
tos: Track&Field I, Fútbol, 
Soccer, Monkey Academi, etc. 
Franciso Javier Orellano Liza. 
C/ Mariano Vergara n.° 7, 5.° 
Atico. 30003 MURCIA. CP.l. 
Vendo ordenador SVI-328 con 
Superexpander 605B de dos 
unidades de disco, doble cara 
doble densidad, e impresora 
Seikosha con cable y tarjeta 
centronic. Todo por el 50% de 
su valor según facturas de com- 
pra. En perfecto estado. Jacinto 
Moreno Aguilar. Avda. de Cá- 
diz, n.° 10. 14009 CORDOBA. 
Tlf.: 29 90 63. CP.l. 
Vendo o cambio por impreso- 
ra, unidad de disco o periféri- 

sette y STCfSo a marca SONY 
cfs55L, y 1 cámara réflex marca 
Zenith con objetivo y flash elec- 
trónico. Juan Manuel Elices. C/ 
Larragain n° 6, 3.° D. Mondra- 
gón. GUIPUZCOA. Tlf.: (943) 
79 80 64, de 19 a 22 h. CP.l. 
Cambio juegos originales de 
Konami (Yie Ar Kung-Fu, 
Knight-Mare, etc), de Erbe 
(Avenger, Desolator, Basquet) 
por Green Beret, Goonies, Ne- 
mesis, Batman, Deus ex Machi- 
na, y otros. Carlos Angulo. C/ 
Sant Felip de Roses n.° 45. Ba- 
dalona. BARCELONA. Tlf.: 
384 02 14. CP.l. 
Cambio por un cartucho u 
otros programas estos 5 origi- 
nales: Chiller, Octagon, M-47, 
Space Walk, Fórmula-I. Tam- 
bién los vendería a 1.250 Ptas. 
Antonio Plaza. C/ Barceló, 6- 
2 ". 28004 MADRID. CP.l. 
Compro unidad de disco para 
diskettes de 5,25 ó 3,5 pulga- 
das, impresora o impresora- 
plotter, Music Modules y en- 
samblador/desensamblador. 
También cambio programas 
MSX originales, preferente- 
mente de gestión. José Ríbelles. 
Tlf: (96) 370 94 85. San José de 
La Montaña 14-D. 46008 VA- 
LENCIA. CP.2. 
Intercambio trucos, conoci- 
mientos del MSX y de la uni- 
dad de disco 3,5 pulgadas. Po- 
seo mapas de memoria ROM. 
Carlos Mateos. C/. Doctor Za- 
menhof, 24. 3°, 1.". 08240 
Manresa. BARCELONA. CP.2. 
Vendo en perfecto estado por 
compra de un MSX-2, ordena- 



dor YASHICA MSX, 64 Kb 
RAM, manual en castellano, 20 
juegos comerciales y libro de 
programación por 33.000 Ptas. 
Francisco Bautista Ferraz. Tlf. 
252 2 1 74. C/. Narciso Serra n.° 
6. 28007 MADRID. CP.2. 
Vendo cartuchos Yie-Ar Kung 
Fu 2, Time Pilot, Hyper Ram- 
my y Antartic Adventure y cin- 
tas originales de Pastfinder, Su- 
per Cness y Oh! Mummy. To- 
dos con instrucciones. Agustí i 
Caries Forrellat Brossa. Tlf: 
(93) 716 41 92. Ctra. de Prats 
99. 08208 SABADELL. CP.2. 
Vendo cartucho LOGO Phi- 
lips para los MSX junto con 
manual de instrucciones. J. Ra- 
món Alvarez. Tlf: 94-499 84 77. 
BARAKALDO. CP.2. 
Vendo Spectravideo SVI-728 
muy poco usado, con muchos 
juegos, todos los accesorios del 
ordenador, muchas revistas, 
joystick, etc, casi regalado. 
También vendo Spectrum 48 
Kb muy barato. Lo vendo todo, 
junto o separado por compra 
de un MSX-2. Francisco Javier 
Paz. Tlf: (91) 200 96 72. Ú. Las 
Pedrofleras 14, 4.° 3.". 28043 
MADRID. CP.2. 
Vendo ordenador ORIC AT- 
MOS de 48 Kb, teclado profe- 
sional, seis juegos y un procesa- 
dor de textos y cables para tele- 
visor y grabadora por sólo 
15.000 Ptas. Valorado en 
40.000 Ptas. Javier López. Tlf: 
(93) 841 71 74 a partir de las 
19,15 h. CP.2. 

Vendo juegos (código máqui- 
na) para SV-328 o SV-318, cin- 
tas originales y los mejores jue- 
gos. José Jorge Vaz. Tlf: (968) 
27 50 70. C/. Travesía de Vigo, 
n ° 28, 3.» B. Vigo-6. PONTE- 
VEDRA. CP.2. 

Vendo ordenador Toshiba 
HX-10 por 30.000 Ptas. Carlos 
Sánchez López. Tlf: 22 69 76. 
Avda. Portugal 48-50, 8.° B. 
37003 SALAMANCA. CP.2. 
Compro tarjeta controladora 
de disco y otros periféricos para 
Spectravideo SVI-3 18/328. 
José M. Muñiz. C/. M. Hermi- 
da, 72-P1-5B. 39009 SAN- 
TANDER. CP.2. 
Vendo Spectravídeo SV-328 de 
80 Kb RAM, Super Expander 
SV-601 con 7 conectores, con- 
trolador de discos SV-801, uni- 
dad de disco de 5 1/4 pulgadas 
SV-902 y cassette especialpara 
ordenador SV-903, con todos 
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los manuales y compl 
discos y cintas con juegos. 
Todo por 55.000 Ptas. Wüly 
Miragall. Tlf. (93) 560 53 49 (a 
partir de las 21h). Av. Uno n.° 
4, 2.° 3.". Sta. Perpetua de Mo- 
goda. BARCELONA. CP.2. . 
Vendo Sony HB-75P de 80 Kb, 
cassette Sony SDC-500 y lápiz 
óptico Sanyo MLP-001, cartu- 
chos y juegos. Francesc Rosado 
Safont. Tlf. (93) 384 41 67. Ba- 
dalonal(BARCELONA).CP.2. 
Vendo Spectravídeo 728 MSX 
y unidad de disco Toshiba 3.5". 
Poco uso. Regalo discos con 

dBASE II,\ordStar, S Cobof 
Fortran, etc. Precio a com 
Manuel Javier Lombao Iglesias 
Avda. Rubine 13-15 2." C. 
15004. LA CORUÑA. Telf. 
(981)27 83 42de2a4ydel0a 
12. CP.2. 

Vendo Sony HBjlOlP con to 

tas. Sólo se ha usado dos veces 
José Juan Fernández. C/Con 
cepción Edif. Alhambra 3.° C 
GRANADA. Tlf. 20 26 39 (de 
8 a 14 horas). CP.2. 
Contacto con usuarios de Spec- 
travídeo SVI-328 para inter- 
cambiar información. Roberto 
Alcalde. C/Padre Aramburu 
n.° 5, 2." C izq. 09006 BUR- 
GOS. Tlf. 21 08 76. CP.2. 
Vendo cartucho original de 
GREEN BERET de KONA- 
MI. Nuevo, con instrucciones 
en castellano por 4000 Ptas. 
Contrareembolso. Interesados 
escribir al apartado de correos 
342 VITORIA (ALAVA).CP 2 
Cambio curso de BASIC MSX, 
marca Sony en vídeo BETA ori- 
ginal y sin usar por tres juegos 
comerciales originales en cas- 
sette o por dos juegos si alguno 
es en formato de cartucho. Es- 
cribir indicando títulos a María 
Luisa Causo. C/Funicular 18, 
2.° Iz. Valle de Trapaga. VIZ- 
CAYA. CP.2. 

Intercambio programas MSX 
originales. Tengo GOONIES, 
GREEN BERET, CAMELOT 
WARRIORS, etc. Me interesan 
THUNDER BALL, EQUI- 
NOX, LODE RUNNER. Ma- 
nuel Mateo Cordón. C/Santo 
Domingo n.° 7. 11006 CADIZ 
CP.2. 

Vendo ordenador Sanyo 64 Kb 
MSX y cassette nuevo por 
50000 Ptas. Regalo cartucho 
"Konami's Tennis", revistas y 
juegos. Margarita Porro. C/ 
Emilio Ortufio n.° 8, 3." 19. 
03500 Benidorm. ALICANTE. 
CP.2. 

Vendo Spectravídeo 728 y uni- 
dad de disco SVI 707, progra- 
mas, etc por 85.000 Ptas. Juan 
José Polero. C/Badal, 140, 5.° 



Tlf. 332 38 14. 08028 BARCE- 
LONA. CP.2. 

Vendo ordenador Spectraví- 
deo 728 MSX de 80 Kb con ga- 
rantía, libros y 50 juegos origi- 
nales por 30.000 Ptas. Juan M* 
Gorrotxategui. Tlf. (943) 88 54 
74. Guipúzcoa 16, 4." C. 20240 
Ordiria. GUIPUZCOA. CP.2. 
Vendo HIT BIT 55-P por 
17.000 Ptas. Incluyo en el pre- 
cios un cartucho PEETAN, 2 
cintas de ADVANCE (gusano 
y editor musical) además de los 
manuales y cables de conexión 
del propio ordenador. Francis- 
co Alarcón Hidalgo. C/L'alou 
27-bajos. S. Boi de Llobregat. 
BARCELONA. CP.2. 
Compro ampliación de memo- 
ria de 16 ó 64 Kb, urgentemen- 
te. Gonzalo Márquez Benítez. 
C/Ntra. Sra. Merced S/N. C/P. 
Aljoxaní. CORDOBA. CP.2. 
Intercambio programas origi- 
nales (juegos, aducativos y de 
aplicación). Poseo una gran 
cantidad de títulos. Juan Ma- 
nuel Sen. Tlf: 22 20 55. C/Gó- 
mez Ulla 18-22, 2." D. SALA- 
MANCA. CP.2. 
Vendo ordenador PHILIPS 
MSX de 80 Kb sin estrenar por 
25.000 Ptas. David Altafaja. 
Tlf: 211 85 95. CP.2. 
Vendo Philips MSX VG-8010 
80 Kb más 30 programas por 
33.000 Ptas. Juan. Tlf: (954) 14 
18 07. CP.2. 

Vendo ordenador SVI-728 de 
80 Kb por 33 .000 Ptas o lo cam - 
bio por un Commodore 64/128 
Kb. Alfonso Montoya Quiles. 
Tlf: 43 16 12. Pza. Nueva n.° 5. 
Albox. ALMERIA. CP.2. 
Vendo Sonv HIT-BIT 101P; 
casi no lo he utilizado. Buen 
precio, a convenir. M.* Teresa 
Martínez García. Tlf: (968) 61 
64 48. C/MUlán Astray n.° 29. 
30500 Molina de Segura. 
MURCIA. CP.2. 
Vendo Sony HB-5P y amplia- 
ción de memoria a 32 Kb por 
20.000 Ptas. Ordenador sin 
ampliación por 15.000 Ptas. 
Luis Marco. Tlf: (96) 120 2 1 58. 
C/Diputación n.° 5, 8.°. Silla. 
VALENCIA. CP.2. 
Vendo MITSUBISHI MSX 80 
Kb modelo FX2. Regalo cinta 
con juegos. Precio a convenir. 
Tlf. (943) 39 63 36. Preguntar 
porJON. DONOSTIA. OJu- 
UoUrqui¡o30,5. o A. CP.2. 
Vendo ordenador Philips VG- 
8000 con ampliación de memo- 
ria de 16 Kb, 30 juegos comer- 
ciales, libros y revistas por 
20.000 Pts. Compro unidad de 
disco MSX. Juan M." Gorrot- 
xategui. Tlf: (943) 88 54 74. 
Guipúzcoa 16,4.°C.20240Or- 
dizio. Guipúzcoa. CP.2. 



UN LIBRO 
PENSADO PARA 
TODOS LOS 
QUE QUIEREN 
INICIARSE DE 
VERDAD 
EN LA 

PROGRAMA- 
CION BASIC 

Construcción de 
programas. El potente 
editor todo pantalla. 
Constantes 
Series, tablas y 
cadenas. Grabac 
programas. Gest 
archivo y grabac 
de datos. Tratan 



de t 




gráficos del MSX. 
Los sonidos del MSX. 
Las interrupciones. 
Introducción al 
lenguaje máquina. 



Y ADEMAS PROGRAMAS DE EJEMPLO 

Alfabético. Canon a tres voces. Moon Germs. Bossa Nova. Blue 
Bossa. La Séptima de Beethoven. La Flauta Mágica de Mozan. 
Scrapple from the apple & Donna Lee. The entretainer. Teclee un 
número. Calendario perpetuo. Modificación Tabla de colores 
SCREEN 1 . Rectángulos en 3-D. Juego de caracteres alfabéticos en 
todos los modos. Juego Matemático. Más grande más pequeño. 
Poker. Breackout. Apocalypse Now. El robot saltarín. El archivo 



Deseo me envíen el libro de los secretos del MSX, para lo 
cual adjunto talón de 1.500 ptas. a la orden de MAN- 
HATTAN TRANSFER, S.A. 

Nombre y apellidos 

Calle n." 

Ciudad CP 

Este boletín me da derecho a recibir los 
mi domicilio libre de gastos de envío 
cargo. No se admite contrareembolso. 
Importante: Indicar en el sobre MANHATTAN 
TRANSFER, S.A. 

«LOS SECRETOS DEL MSX» 

Roca i Batlle, 10-12 Bajos - 08023 BARCELONA 



MSX en 
alquier otro 
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FALLO DEL 2.° CONCURSO 
DE PROGAMAS SONY 



Muchos programas, y de muy buena calidad, participaron en el segundo Concurso de SONY; nos 
consta que el jurado lo tuvo difícil. Pero tras las deliberaciones, ahí van los ganadores. 



SONY ESPAÑA S.A., convocó la 
segunda edición del Concurso de 
Programas MSX con la intención 
de proseguir en su tónica de estímulo 
a las iniciativas de los usuarios de orde- 
nadores de la norma MSX. Para ello, 
en su segundo Concurso de Programas 
MSX -al igual que en la primera- se es- 
tablecieron dos categorías: 

A) Programas de contenido científi- 
co, desarrollados por Centros Docen- 
tes, entre los especificados en los pla- 
nes de estudio vigentes. 

B) Programas libres, con temas de li- 
bre desarrollo para usuarios privados 
de ordenadores MSX. 

La ingente cantidad de programas 
recibidos en la primera edición de este 
Concurso, celebrada en 1985, ¡unto 



con la gran diversidad de temas que 
abarcó el apartado de temas libres, 
obligó a realizar una segunda clasifica- 
ción, teniendo incluso que efectuar 
una división del primer premio entre 
dos concursantes, puesto que la exce- 
lente calidad de ambos programas ha- 
cía muy difícil decantarse por uno u 



Con esta segunda edición del con 
curso de programas MSX, Sony Espa 
ña quiere dar continuidad, año trai 
año, a esta iniciativa que, por la altí 
participación que ha mantenido en es 
tas dos ediciones, cree conveniente re 
petir puesto que 
sarroffadas por 
dos de ordenado 
particular como i 



de 



MSX, tanto a nivel 
\ categoría de Cen- 



Tadashi Hasunuma en Sony Gallery. El nuevo Director General de Sony España y Consejero Delegado e 
tos Sony en Barcelona, donde a partir del 10 de abril permanecerán expuestos los programas ganadom 



tros Docentes. 

El jurado constituido para esta se- 
gunda edición del Concurso, estuvo in- 
tegrado por: 

D. a Elena Veiguela, Consejera Téc- 
nica para programas de nuevas tecno- 
logías -dependiente de la Secretaría 
General de Educación- Ministerio de 
Educación. 

D. Santiago Guillén, Director Gene- 
ral del Centro Divulgador de la Infor- 
mática de la Generalitat de Catalunya. 

D. Pere Botella, Profesor de Infor- 
mática de la Universidad Politécnica 
de Barcelona. 

D.* Birgitta Sandberg, de Manhattan 
TransferS.A. 

D. Vladimir de Semir, Subdirector 
de LA VANGUARDIA. 

i la Sala de Exposición Permanente de produc- 
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EFEMERIDES SONY 



Mayo 1946: La empresa Tokyo Tsus- 
hin Kogyo K.K. (Tokyo Telecümuni- 
cations Engineering Corporation) fue 
constituida por los Sres. M. Ibuka y A. 
Morita, con un capital escriturado de 
500$ USA. 

Febrero 1955: Por primera vez se uti- 
liza SONY como nombre de marca 
para productos de la compañía Tokyo 
Tsushin Kogyo K.K. 
Enero 1958: Se adopta el nombre 
SONY como nombre de la sociedad: 
Sony Corporation. 

Junio 1961: Se inaugura el Centro de 
Investigación Sony (Japón). Son ofre- 
cidas al público 2 millones de acciones 
en forma de ADR (Bonos de depósito 
americanos). 

Abril 1966: Inauguración del edificio 
SONY en Ginza: 



de Se 
reestn 



Ichü 



Hispí 



para compañías de far 
en Tokio. 

Mayo 1971: Las fábr 
Inazawa e Ichinomiya 
radas y se convierten respe 
en Sony Corporation y Son 
ya Corporation. 
Marzo 1975: Constitución d< 
no Sony, S.A. (cambio de de 
ción a Sony España, S.A. en marzo 
1982). 

Agosto 1979: Constitución de Sony 
Prudential Life Insurance Company 
Ltd. (Japón). 

Septiembre 1983: Inauguración de la 
nueva fábrica de Sony España, S.A., 
en Parets del Valles (Barcelona). 
Noviembre 1985: Sony desarrolla el 
primer videodisco digital en el mun- 
do. 



"PREMIOS 
CONCURSO 
SONY" 



CATEGORIA CENTROS DOCENTES 

PREMIO DE 1.000.000 PTAS. 

CENTRO DOCENTE LICEO EUROPA 
AUTOR JOSE VICENTE BELTRAN PRIEJC 



CATEGORIA GENERAL 



ler. PREMIO DE 500.000 PTAS. 

AUTOR MIGUEL RAMISAMI 
PALMA DE MALLORCA 
PROGRAMA: DRAW 

2o.. PREMIOS: 
PREMIO DE 300.000 PTAS. 

AUTOR: EMILI SETO PAMIES 

REUS (TARRAGONA) 
PROGRAMA: MATHS GRAPHS 

PREMIO DE 300.000 PTAS. 

AUTOR )OAN PUYAL CANE1 
LA ROCA DI' VAIIIS BARCELONA! 
PROGRAMA: GRAFO 

3o». PREMIOS 
PREMIO DE 100 000-PTAS. 

AUTOR: JOSE MANUEL RODRIGUEZ SANCHO 



PREMIO DE 100.000 PTAS. 

AUTOR- 1 IUMBERTO MARTINEZ BARBERA 
AU CARTAGENA (MURCIA) 
PROGRAMA: SIMPHONY 




El programa ganador en la categoría 
de Centros Docentes (como puede ver- 
se en el cuadro adjunto) fue MOTOR 4 
del Liceo Europa de La Línea de la 
Concepción, programa educativo que 
explica de una forma interactiva el fun- 
cionamiento de un coche (motor, en- 
cendido, carburación y cambio) pu- 
diendo controlar todos los dispositivos 
mediante el joystick. El primer premio 
de la categoría general, que fue a parar 
a Palma de Mallorca para Miguel Ra- 
mis, DRAW es un interesante progra- 
ma de gráficos, así como los dos segun- 
dos siendo MATHS GRAPHS un inte- 
resante programa de representación de 
funciones matemáticas y GRAFO un 
programa de gráficos de gestión. 

Así como el primer y segundos luga- 
res fueron acaparados por los gráficos, 
dos de los tres programas que se lleva- 
ron terceros premios (vaya lío de nú- 
meros) trataban con el sonido, SIM- 
PHONY y SONIDOS, mientras que el 
restante tercer premio se lo llevó un ex- 
celente juego de aventuras llamado 
HADES. 

Como puede verse, a la hora de valo- 
rar los programas el jurado tuvo espe- 
cialmente en cuenta cuales de ellos po- 
tenciaban las peculiaridades gráficas y 
de sonido de los equipos MSX, que 
como sabemos, son de un atractivo in- 
comparable para los usuarios de orde- 
nadores domésticos, entre los que la 
norma MSX es líder absoluta. 

¿Para cuándo el próximo concurso, 
SONY? 




Te encuentras en un oscuro 
castillo abandonado, inten- 
tando encontrar una llave 
de oro para romper el he- 
chizo que te impide salir. 
Para lograrlo tienes que ha- 
cer estallar los barriles de 
TFT y esquivar los mons- 
truos y la corriente de lava. 
Un apasionante juego de 
aventura. 

' Nombre y Apellidos: 



Población: 

Provincia: 

□ Deseo recibir: 



El importe de mi pedido lo hago e 
tivo mediante: 

□ Cheque adjunto a nombre de: 
MSX CLUB DE CASSETTES 
C/P-ocayBatlle, 10-12, bajos. 
08023 Barcelona 



Elbasic paso a pasoi 



■Por Willy Miragall, 



SEGUIMOS CON 
LOS BUCLES 



Debido a la gran importancia 
que tienen los bucles seguimos 
hoy con nuevos ejemplos que 
puedan haceros notar la impor- 
tancia que tienen dentro de 
nuestros programas. 



Antes de seguir con nuestro repa- 
so a los bucles vamos a añadir 
nuevas instrucciones a las que 
ya conocemos. Estas instrucciones nos 
van a permitir modificar el formato en 
que hasta ahora hemos utilizado 
PRINT. 

La instrucción LOCATE X,Y colo- 
ca el cursor en las coordenadas de la 
pantalla que indiquen X e Y. Aclare- 
mos que X e Y no tienen por qué ser va- 
riables. Son simplemente una forma de 
expresarnos. Lo veréis más claro con 
los ejemplos que os damos a continua- 
ción. 

¡0 LOCATE 7,11 

20 PRINT "Hola amigos de MSX- 
Club" 

Estas dos líneas de programa harán 
que el texto incluido en el PRINT apa- 
rezca centrado en la pantalla, exacta- 
mente a partir de la posición 7 horizon- 
tal y 1 1 vertical. 

El funcionamiento de este programa 
es muy simple. La línea 10 coloca el 
cursor en la fila 11, columna 7, y la si- 
guiente línea imprime el mensaje en la 
pantalla, en la posición que le indica el 
cursor. 

DIBUJAR CON ESTRELLAS 

Para empezar con los ejemplos de 
bucles vamos a hacer un programa que 
haga una línea vertical de estrellas en la 
pantalla. Este programa, si no supiése- 
mos programar bucles sería: 

10 LOCATE 20,0 

20 PRINT"*" 

30LOCATE20,! 

40 PRINT"" 

SO... 

Y así hasta la línea 
4Í0 LOCATE 20J3 
460 PRINT"*" 

Pero gracias a que conocemos los 
bucles FOR, este programa queda muy 
simplificado, y de la forma. 

10 FOR 1=0 TO 2) 

20 LOCATE 20,1 

30 PRINT"*" 

40NEXTI 

Para poder pasar del programa largo 




FOR no hay más que fijarse 
en las instrucciones que se repiten. Es- 
tas instrucciones son las líneas 20 y 30 
del bucle. Lo único que cambia es el se- 
gundo parámetro del LOCATE, co- 
rrespondiente a la coordenada vertical. 
Esta es la razón de que utilicemos una 
variable para este parámetro, la varia- 
ble I, que varía entre 0 y 23. 

Otra forma de entender el bucle, tal 
vez algo más sencilla, es ver que la I es 
sustituida primero por 0, luego por 1, y 
así hasta 23, repitiéndose mientras tan- 
to las líneas 20 y 30, situadas entre el 
FOR y el NEXT. 



Las líneas que componen el corazón 
del bucle, 20 y 30, están un poco más a 
la derecha de lo normal. Esto no es 
obligatorio, pero, como ya comentába- 
mos en el pasado número, ayuda mu- 
cho a la hora de saber cuáles son las ins- 
trucciones que se repiten dentro del 
bucle. 



CENEFA 



A continuación os incluimos un pro- 
grama que dibuja una cenefa en la pan- 
talla. En realidad vamos a recuadrar la 
pantalla mediante estrellas, utilizando 
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para ello la instrucción FOR. Espera- 
mos que no os sea difícil entender el 
programa, y el uso de la instrucción 
FOR. 

10 WIDTH40 

20FORX=0TO39 

}0 LOCATE X,0 

40 PRINT "** 

SO LOCATE X.22 

60 PRINT"*" 

70NEXTX 

80 FOR Y=0TO22 

90 LOCATE 0,Y 

100 PRINT"*" 

110 LOCATE 39,Y 

120 PRINT"*" 

130NEXTY 

140 LOCATE 7,11 

150 PRINT "Hola amigos de MSX- 
Club" 

Este programa, algo más largo de los 
que hemos hecho hasta ahora, no es, ni 
mucho menos, el mejor que podíamos 
haber hecho. Tal vez por un exceso de 
amor a los bucles no nos hemos dado 
cuenta de que las líneas 10 a la 70 po- 
dían haber sido sustituidas por: 

20 PRINT °"*******...40 estre- 
llas... *******" 

30 LOCATE 0^2 

40 PRINT "*»*****,..40 estre- 
llas...*******" 

Con esto os queremos hacer refle- 
xionar. Los bucles son muy interesan- 
tes; pero es preferible no utilizarlos si 
pueden ser sustituidos por algo más 
simple, como en este caso. 

Esta última solución no es, ni mucho 
menos, la mejor, ya que podíamos ha- 
ber utilizado la instrucción STR1NG$, 
de la que hablaremos más adelante. 
Vamos, no obstante, a dar algún otro 
ejemplo de uso de los bucles con 
PRINT. 

PIRAMIDES 



Otro ejercicio típico de uso del LO- 
CATE con bucles es la construcción de 
pirámides. Damos a continuación un 
programa de dibujo de pirámides. 

10FORX=1 TO10 

20 LOCATE 20- X,X 

30 FOR 1=1 TOX 

40 PRINT"*"; 

50NEXTI 

60NEXTX 

Este ejemplo es algo más peliagudo 
que los anteriores, ya que hemos inser- 
tado dos bucles, uno dentro de otro. 
En este tipo de programas conviene in- 
tentar entenderlos a partir del bucle 
más interno. 

El bucle de las líneas 30 a 50 escribe 
tantas estrellas como indique la varia- 




ble X. El punto y coma que sigue al 
PRINT de la línea 40 indica que, tras 
imprimir ese carácter, deje el cursor en 
la misma línea. Gracias a esto las estre- 
llas aparecerán en la pantalla una de- 
trás de otra. 

Ahora sustituid mentalmente esas 
líneas por la frase " Escribe tantas estre- 
llas como indique X". Entenderéis el 
programa sin ninguna dificultad. 



Este es un buen momento para echar 
la vista atrás. Ya conocemos las ins- 
trucciones necesarias para poder reali- 
zar nuestros primeros programas. 

A partir del próximo número co- 
menzaremos a tratar las instrucciones 
gráficas. Esto no quiere decir que ya 
Rayamos superado el BASIC elemen- 
tal. Nada más lejos de la realidad. He- 
mos decidido tratar los gráficos porque 
permiten "ver" nuestrosprogramas. Es 
muy fácil ver en qué nos hemos equivo- 
cado al definir un bucle si obtenemos 
una línea fuera de lugar, o cualquier 
otra deformación de un gráfico. 

Pero antes de iniciarnos en el apasio- 
nante mundo de los gráficos por orde- 
nador vamos a realizar un breve repaso 
a todo lo visto hasta ahora. 

* Todo programa en BASIC está 
compuesto por un conjunto de líneas 
numeradas que contienen instruccio- 
nes BASIC. Podemos numerar las lí- 
neas como queramos, aunque normal- 
mente se hace de 10 en 10. 

Las instrucciones BASIC vistas aho- 
ra son 



* PRINT, escribe en la pantalla el 
mensaje que le sigue. El ordenador es- 
cribirá un número siempre que le sea 
posible. Cuando queramos que aparez- 
ca un texto debemos situarlo entre co- 
millas. 

Podemos separar con punto y coma 
diferentes textos o números que quere- 
mos que aparezcan en la misma línea. 
Si utilizamos comas (en lugar de pun- 
tos y comas) se dejará un espacio entre 
los diferentes textos escritos. 

Podemos dejar un punto y coma (o 
coma) al final de la línea PRINT, con lo 
que indicamos que el siguiente PRINT 
se realice en la misma línea. 

Ej: PRINT "Dos más dos es:";2H-2 

* INPUT, hace que el ordenador es- 
pere una respuesta del usuario. Pode- 
mos incluir un texto explicativo entre 
comillas. Al final del INPUT debe 
siempre aparecer una variable en la que 
se almacenará la respuesta del usuario. 

Si hemos introducido texto explica- 
tivo la variable debe ir separada del 
texto (entre comillas) por un punto y 

La variable debe ser del tipo apro- 
piado para almacenar la respuesta del 
usuario: numérica si preguntamos un 
número y de caracteres (con $) si pre- 
guntamos un texto. 

El comando INPUT siempre añade 
un interrogante al final del texto expli- 
cativo. 

Ej: INPUT "¿Cuántos años tienes"; 
EDAD 

INPUT "¿Cómo te llamas" ;N$ 

* IF... THEN..., es una estructura 
que nos permite seleccionar si una ins- 
trucción se ha de ejecutar o no depen- 
diendo de una condición. La instruc- 
ción (o instrucciones) que siguen al 
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El basic paso a paso 



THEN se ejecutarán únicamente si se 
cumple la condición que se encuentra 
entre el IF y el THEN. 

Ej: IF A>B THEN PRINT "A es 
mayor que B" 

* GOTO, nos permite modificar el 
flujo normal del programa. Al encon- 
trar una instrucción GOTO el progra- 
ma continuará en la línea indicada por 
el número que sigue a GOTO. 

Ej: GOTO 40 

* BEEP, produce un breve pitido 
del altavoz de nuestro televisor o moni- 
tor. 

* COLOR, cambia el color tanto del 
texto como del fondo de la pantalla. 
Deben seguir dos números a COLOR, 
el primero el código de color que que- 
remos tengan las letras y el segundo el 
del fondo. 

Ej: COLOR 15,4 



* CLS, borra la pantalla y sitúa el 
cursor en la esquina superior izquierda 
de la misma. 

* LOCATE, coloca el cursor en las 
coordenadas de la pantalla especifica- 
das por los dos números que siguen. El 
primero es la coordenada horizontal y 
el segundo la vertical. 

Los límites de la pantalla son, en ver- 
tical, de 0 a 23 (ó 22 si aparecen las te- 
clas de función en la pantalla), y en ho- 
rizontal de 0 a 39 (dependiendo este úl- 
timo de si hemos utilizado o no la ins- 
trucción WIDTH). 

Ej: LOCATE 10,12 

* FOR...TO...NEXT. permite la re- 
petición de las líneas de programa en- 
tre FOR y NEXT tantas veces como in- 
dique el FOR. 

Ej:FORI=lTO10 
PRINT I 




NEXTI 

Podemos modificar el paso en que se 
incrementa la variable (normalmente 
de- u no en uno) por medio del coman- 
do STEP. 

Ej:FORI=lTO10 STEP 2 



En el bucle FOR podemos utilizar 
cualquier tipo de variables. Fijaos en la 
forma en que se utiliza el FOR y en 
cuándo se debe utilizar. 




EJERCICIOS 



1 - Dibujar vuestro nombre en la 
pantalla mediante estrellas. Utilizad 
bucles siempre que sea posible. Este 
ejercicio es largo; pero no excesiva- 
mente difícil. 

2 - Llenar toda la pantalla con la le- 
tra "A". 

3.- Dibujar en la pantalla una X que 
ocupe el máximo tamaño en la panta- 
lla. 

SOLUCIONES A LOS 
EJERCICIOS DEL MES 
PASADO 

Una posible solución al problema de 
la tabla de multiplicar con FOR es: 
10 INPUT "¿Qué tabla";N 
20 FOR 1=1 TO10 
30 PRINT N; " *";I; "= ";N*I 
40 NEXTI 

Esperamos que no os haya sido exce- 
sivamente complicada la resolución de 
este ejercicio. 

El segundo problema propuesto en 
nuestro último número era el del cálcu- 
lo del factorial de un número. Una so- 
lución puede ser: 

10 INPUT "¿Que número" ;N 

20F=1 

30 FOR 1=1 TON 

40F=F*l 

Í0 NEXTI 



60 PRINT "El factorial de";N; 
"es";F 

Tercer problema, realizar las 10 ta- 
blas de multiplicar. Existen muchas 
posibles soluciones; pero la mayor par- 
te deben utilizar dos bucles anidados, 
es decir, uno dentro de otro. Observad 
el siguiente programa: 

10 FOR 1=1 TO10 

20 PRINT "La tabla del";I;"es" 

)0FOR]=l TO10 

40 PRINT I;"*"J;"=";I*J 

50 NEXT] 

60 NEXTI 

Como ya hemos comentado, para 
entender mejor el programa hay que 
empezar a mirarlo desde dentro. El bu- 
cle de las líneas 30, 40 y 50 nos es muy 
familiar, ya que escribe en pantalla la 
tabla indicada por la variable L Cam 
biar las lineas 30 a 50 por la frase "Es 
cribe la tabla del I" y veréis como el 
programa os aparece mucho más claro. 

Finalmente el último problema, es 
muy fácil, aunque algo diferente a los 
anteriores. , 

10 INPUT "¿Cuántos datos?";N 

20S=0 

30 FOR 1=1 TON 

40 INPUT "Entre dato";D 

50S=S+D 

60 NEXTI 

70 PRINT "La media es";S/N 



Finalmente una nueva instrucción, 
WIDTH. 

* WIDTH, modifica el ancho máxi- 
mo de la pantalla. Si hacemos WIDTH 
10, la pantalla quedará reducida a 10 
caracteres de ancho. El máximo núme- 
ro que podemos utilizar con WIDTH 
es 40, en los MSX de primera genera- 
ción y 80 en los MSX cíe segunda gene- 
ración. 

Esperamos que este breve resumen 
os sirva de recordatorio. 
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Programa 



— _ Por Vicente Uceda Alvarez i 



FISICA 



Completísimo programa edu- 
cativo sobre física general. In- 
cluye temas sobre lentes y espe- 
jos, mecánica y física de partícu- 
las. Un programa excelente con 
unos soberbios gráficos. 



1 'imittiiitiittmtmitimiiut 

2 'til FISICA Itt 

3 '«II por: III 

4 'III VICENTE A. UCEDA II I 

5 'titiitmtiiiitiitttiittmtttiii 

10 60T0 80 

20 PSET ( 10, 1B0) . 1 :PRINT#1 . "PULSA space 
PARA NNTINUAR":RETURN 
30 SCREEN 0:KEY 0FF:CLS:COLDR 1,15,15: 
LOCATE 7.2:PRINT'V OCABULARIO 

"¡LOCATE 7,3:PR¡NT- - - 

--":RETURN 

40 SCREEN 2:COL0R 1.18,12:CLS:0PEN "6R 
P:"F0R OUTPUT AS ll:FSET(40,15),10:RET 
ÜRN 

5Í SCREEN 1:CLS:PRINT" II INSTRUCC 
IONES tr:PRINT:PRINT"Escribe «s> para 
el dato que quieras hallar. Introduce 
los datos en las «edidas que se te in 
di can. ":FETURN 

M LINE 1A*,AYI-!*,YI,5:A(RI=M28:B(R 
>=¥-96:R=R*l: X=AX : ¥=AV: RETURN 

n ' 

80 ' ttttl presentación HUI 

11 1 

108 CLEARiOPEN "6RP: "FOR OUTPUT AS II: 

COLOR 1,1 1,15: SCREEN 2 

1 10 PSET(15,132),1:DRAN , F1R1E1R2EIR1EI 

R7F3R2F1R1F5R1F1RIF7R1F3R1F2R1F3R1F1R3 

F1R3F1P5E1R3E1P4E2U1E1U1E2R5U1E3R4E5UI 

E1U1E1U1E1U1E1U1E1U1E1U1E2U1" 

128 DRAN-L162L2H3U1D1GIL162L2U3E163L3H 

1 U4G3L 1E 1L3U3L 1 D2L2H2U2D1 G 1 D2L 1 H2U4D6L 

2HlU3u3F3R5FlRllFlR6ElR4D3GIDt61D2G101 

61K1NL1H2L18H1L4G1L1" 

136 PSET Ü11,13B),1:DRAN"61H1L5D161D1 

L17H1L3H1L2U2H1U3H1U2H1U3H1U9EIU4L5D26 

1D36102L4U5E1U4E1U4E1U3E1U5H7U1L2U1L2H 

1E1U1E1U2E2F1D1F1D1R4E1R1E3U1E2U1G3D26 

2H1" 

148 DRAtJ'ElU2ElUlE3R12D2LlGlL461LlG2Dl 

G1D164L261F1R1F1D2R1U1E1U1R2F2D2F1R2F1 

R5E1R1E1R1E1R1E2U1E1U1L1G2L161L1G2L16I 

L4H1E1R3E1R1E1RIE2LI61L1B1L5H3" 

156 DRAN , UtElF4R2E3RlFIRlUlH2UlLlMLlH 

IL262L161L2U1E1U1E1R4E1R5F1D1F2D2F1D1R 

1E1U2H2U1H2U1H1L2U2R1E3H2L1065L1G4D161 

: 




D4L2U3E1U2E4U1E4U1NE3R2E2R1U1R10" 

140 PSET<75.43),l:DRAtrL361L1650l64D16 

1D161L1G1D161D1G1D163H1U1EIU2E1U1E1U2E 

1U1E2L1G1D162D2G2D161D1G1D161L3H4L1H1L 

461L163D1GI0361D1F1R1U2E1U2E1U1E1R4F3D 

4F161L161D5L2" 

178 PSET(36,93) , 1 : DRAN "D5R1 D2R 1D1F1R1G 
1F1R1D5R1F1R3F1D161D4L3D1R1F1R1F1D2L16 
IL2H1L1H1U10H7U4L1D161U4D3L2U4K1D4H2U3 
E1U4E1U1E1U1E1U1E2R3E1R3F1R2F1R2E3U2E1 

1B8 DRAN"U2E!U2E1U3L1D161D261D162L161L 

1E4U1E1U2E1U3E1U2E3U1L162D1G1U2E3U2H1U 

2EIU2L1G4L161L361L7H1L4D463R2E3R1E1R46 

1L1G1L161L2G1L162F1R2" 

198 DRAN-E1RIE1R2E1R5D1G1D161L1G1L2S1L 

3G2F1R3E1R3D3G9L2H1U3E1U1E201E2H1L162L 

161H1E1U1E2U1E2H1L2G2D1G1D1G1D1G1D2G10 

1G2H1U5E1U2E4H1L161H1" 

288 DRAN'E2U1E3U261LI62H1E1U1£1U1E6R1F 

161D1R2E1RBE1R1E1R1E3R1E4R7F1H1L1H1L1H 

1L2H1L1H1L1H2L2H2L101R2F1R1F1D161L1G1L 

1G1L162L167L1H1E1U3R1U1E1R1U1E1U1E1U1" 

218 DRAWE1U1E2R1E2RIE1R1E2R1F1 R5E 1R4U 

3R4L462L761L2G5L164D1615D1G2D261D161D2 

6ID261IHG1036ID3G1D561I)7G1D4R2U5E1U2E1 



U2E1U1E1U2E1R1F1D86ID2G1L1H2D12F1D2F1D 
1FID1R1FIR2F1R1F1D1F1D2F1D2F1D1F1II2F1G 
2L1G1L1D1G1L1G5* 

228 PSETI97, 79» : DRAH'HIUI H3L1H2L 1H2D2R 
1F4D1F1R1F2R1D1863L162L1D1R1D261E7U1D1 
F1D2L3R3G3L3R461D161D161D161L164L1G5F1 
E4R1E5F1D3R1F1R4F1D1F1E1R3E1R2E1R1E1R1 
U1E1R1F1D1FIR1F1R3HIL1H1L1H3L163L5H2U4 
H1G1D5L5U4E1R1E1R1D1F1E1U3H1U4H1U3H1D4 

238 PSET(169,73) :DRAH"R2E2R5F2D3F1D6F1 

D5F10161H1U2H2U2H162D1L1G2R4L4H161D1F5 

R1F1R3D2HIL161D1L1H1L1H2U2H1UIH1U2H1U1 

E1F1D1F1R4H2L1H1U3E2R2F1R2E3LB61L1G1HI 

G1D2G1H1U1H1E1U1E1U1R3E1H2' 

248 PSET(47,47)¡DRAN , L1S3U8E1R2E1R1E1L 

3D1L2D161D1610164D1F162D2R1FID2F162D1G 

1D1R1E2F1D4R2E2U1E1U1E1R1E1R1E1R1E2R1E 

1R1E1R1E1P1E1P4H1L2G1L1G1L1G1L2G1LIGIL 

4D163U3H1U2H2R3E1R1E1R1E1R1E1R1E1R2E1R 

3E1P2M64, 53U2H1 " 

250 PSET (74,35) : DRAN'R2F1R1F2R2H4U1C11 
R2C1R1F3C11RSC1U2L1U2K1U1CUU4N4C1R16F 
1R1C11U4C1L2G1L1G1L2G1L161C11F5D8C1F2R 
1F1R1F1R2F1R2F1R1F1R1F1R1F1E1D3R1D3F1D 
2F1D1C11D4" 











260 0RA«"C1LIU1L!H2L1H2L2H1L4H1L3UIL6C 
11FJC1F4R1FZR6FIR2F lRlf IR1F1R1D1R1F2C1 
1DBC1D4F 1D3C 1 1 M 1 10. 28C 1 R2F 1 P 1 F5 D 1 F 1 D 1 F 
BR1D1F1R1F2R1F2D1F2" 
27í DRAM"CllR2D5CtH2ilUlLlUlH4CllH2ClD 
2F1D1F1D1F1D2F1D2F1D2F1D1F1IMF1D1C11D2 
R1C1R4D2L161L1U3B3F2D2R361R261R2D1CI1L 
5C1FSE1H4C1 1R4D¿C1H2G1F3G1U1L1U1L2U2S4 
R1F1R1D1R2D1R1Í1R2D1CI1L6U4CIL1HIL1F1C 
11H3D2CIF301H2D2F1D1H261D3- 
281 DRAWF2D1F1D1R1D1C1 1U2L2C1U2H1U1L1 
U1L1U2H2L1H1L3G1D161DBF1CUU6C1L2U2H1U 
1D161D5L3U4H1L2H1LID1F2C11R1E2C1R2UB" 
290 PSET(124,107l:DRAN"CtD361D2GlD161D 
161DIU2LIU5L1H1L1D2F1R1F2 
3i0 PSF.TI93, 112>:Dftft«-CIL4DlLI-:RESTaR 
E 3190 

310 FOR 1=1 TO 20¡READ A. BíPflINT ( A, B> i 
NEIT 

320 PSET ( 160,36) , 8: DRAtt"U17R13D 14R9UÍ.L 
AUBR13D14R3U14R19D14L2U6L4D6L2U14L3D2L 
2U2L4DI2R4U2R2D4L13U14L9D4R6D10L13U14L 
9D6R302L3D7L 1 U8R3L3UBH1 1 B 1 4R1 1 U8L6Ü6R 1 
1D14R11U2D2LAU14R&D2U2R11D14U6LAD6U13R 



330 LINE(I59,49)-I248,164),4,BF 
340 ' 

350 ' 1)111 elección de opción Util 
360 ' 

370 PSET (70,175), ItiPRINTIl, "ELIGE OP 
CIDM- 

380 COLOR 15¡PSET(187,56),4iPRINTIl,-|1 
EMU" 

390 PSETü63.88).4:PPINTtl."t-0PTICA" 
400 PSETI163,ll2),4¡PRINTIl,"2-nECAN!C 
A" 

410 PSETI163, 134). liPRINTIl. "3-F.NUCLE 
AR";BEEP 

420 II«INKEYI¡ IF 11«"" THEN 420 

430 IF IWV THEN 470 

440 IF Il="2" THEN 1430 

450 IF 1«="3" THEN 2720 

460 IF IKT OR I$>"3" THEN 420 

464 ' 

465 HUI lentes mu 

466 ' 

470 LINE !159,69)-I248,164),4,BF 
480 PSET (163, 88), 4: PRINTI1,"1 -LENTES" 
490 PSETI143, 134), liPRINTIl, '2-ESPEJOS 

500 I«=INKEY< 

510 IF I»«"l" THEN 570 

520 IF I»="2" THEN 980 

530 IF IIOT OR I«<>"2" THEN 500 

540 ' 

550 'IIUI gráficos explicativos Hit 
560 ' 

564 'ttt dibujo lente convergente m 
570 SCREEN 2¡C0L0R 11, 1, 1 : CLS: PSET ( 16, 



B),1:PRINTI1,"LEN 
5B0 CIRCLE(128,96),50,4,,,5iPAINT(12fl, 
96),4:LINE(20,96)-(235,96),B 
590 PSET ( 128-34, 93) , 1¡ PRINTtl , " • ■ :PSET 
(128*30,93), liPRINTIl,"-" 
600 PSET (83, 1 1 1 > , I: PR1NTII , "f oco" i PSET 
(75,1191, liPRINTIl, "iiagen" 
610 PSET(178,B0),12¡DRAN"C12D15C5D15L1 
U15C12U15R1":PRINTI1," objeto" 
620 PSET(17B,110),ll:DRAH"il2B.110i35, 
45el78.110";PSETIl78.B0);oRAN-il28.80e 
35,125il7B,B0":PSET(128,96l,l 
630 íRAN"c3ilI3,156"¡PRINTIl, "centro o 
ptico" 

640 PSET(35,125l¡uRA«"C12U29C3U29L1029 

C12D29ClL16";PRINTIl,"iiagen" 

650 SOSUB 20 

660 !»=INKEY»¡IF »<>" "THEN 660 
670 ' 

6B0 'ttt dibujo lente divergente (II 
690 ' 

700 CLS¡ PSET 116, 81, liPRINTIl, "LENTE D 
IVER6ENTE" 

710 CIRCLE(113,96). 50,4,4.7124,1. 5708, 
5 

720 CIRCLEI146.96I, 50,4,1.5706.4.7124, 
5 

730 LINE(146,46)-(113,46),4:LINE(146,1 
461-1113,146), 4:PAINT (135,130), 4 
740 L1NE(20,96I-(235.96),8:PSET(94,93) 
, liPRINTIl, "•":PSET(158, 93), liPRINTIl, 

750 PSET(14B,55), liPRINTIl, "foco-;PSET 

(140,63), liPRINTIl. -virtual" 

760 PSET(12B,96),l:DRA«"c3il3B,160cll2 

0":PRINT#1, "centro óptico" 

770 PSET(168,96),4iDRAK"„2011d20c3d20r 

lu20clel0":PRINTI!, -objeto" 

780 PSET(168,76),ll:DRAN"ni20,146il28. 

76141, 20":PSET(168,116),ll¡ORA»"n t 20,3 

7el28,116i20,179" 

790 FOR 1=0 TO 500:NE«T I:LINE(128,76I 
-(235,1401, 4:LINE(128, 1161-1235,50), 3 
800 PSET(147,94),4¡DRAITu811d8c3dBrluB 
"!LINE(147,96)-(I67,126),7:PRINTII,"ii 
agen" 

B10 SOSUB 20 

820 1«=INKEY*¡IF H<>" "THEN 820 
825 ' 

830 '1*1 vocabulario II» 
835 ' 

840 SOSUB 30 

850 PRI NT :PRINT"C0NVER6ENTE: Lente que 
hace converger los rayos paralelos al 
eje en un focosituado al lado contran 
o." 

B60 PRINTiPRINT "DIVERGENTE: Lente en la 
que los rayos que entran paralelos al 
eje salen di-vergentes y sus prolonga 



ciones (azul y verde) se convergen en 
un foco vir-tual." 

870 PRINT:PRINT"EJE PRINCIPALiLinea re 
cta (rojo) in- definida que une los ce 
ntros de cur- va tura de sus caras." 
B80 PRINT:PRINT"CENTRO OPTICOiEs el pu 
nto del eje principal en el cual lo 
s rayos que atraviesan la lente no s 
ufren desvia-cion." 

890 PRINTiPSINT" PULSA space PARA CON 
T1NUAR" 

900 M»MEY»l!F !»<>■ " THEN 900 
910 G05UG 30 

920 PRINT;PRINT"FOCO PRINCIPALiEl punt 
o del eje prin-cipal donde se reúnen 1 
os rayos que atraviesan dicha lente ( 
foco iiagen, 1. convergente) o las prol 
ongaciones de estos al divergir (foco 

virtual, 1. divergente). " 
930 PRINT : PRINT "V ¡RTUAL; Iaagen situada 

detras de la lente":PRINT:PRINT'REAL 
i Iaagen situada entre el objeto odelan 
te de el y la lente" 
940 PRINT:PRINT"REFRACCION:Caabio de i 
ireccion que experimenta la luz al p 
asar de un ee-dio a otro de diferente 
densidad" 

950 PRINT:PRINT"Fulsa <A» para verlo d 
e nuevo. "¡PRINT'Pulsa SPACE para volve 
r a eape:ar." 

960 [♦•INKEYIlIf I«=" " THEN 70 

970 IF I*=V OR IS="A- THEN 570 ELSE 

960 

974 ' 

975 'tlltt espejos tttll 
980 • 

990 'lili dibujo espejD planolllll 
1000 ' 

1010 COLOR 11.1,I:SCREEN 2¡CLS:PSET II 

4,B!, liPRINTIl. "ESPEJO PLANO" 

1020 PSET(12a,156],5iDRAN"ul2012dl20rl 

Ul20r2clel48,140c6il63,55cllal28,55c4e 

91,55c6al06,140c4al28.140cllal4B,14íal 

2B,150nc4il06,140clleI78,!7r 

1030 PSET ( 163, 55) , 1 1 : DRAK'«128. 45c4n<» 

l,55ncllil65,35cl2r45-iPRINTIl,"reflex 

ion" 

1040 PSET (36. 1001, liPRINTIl. "nagen-l 
": PSET (153, 116) , liPRINTIl. " 4-ob jeto" 
1050 GOSUB 20 

1060 I«=INKEY«iIF [*<>■ " THEN 1060 
1070 ' 

1080 'HUI dibujo espejo concavollltl 

1090 CLSiPSET 1 16, Bl , 1 i PRINTI1 , "ESPEJO 

CONCAVO- : LINE (20 . 961 - (235, 961 . 6 

1100 FOR 1=120 TO 123:C1RCLEII,96),80, 

5,2.3562,3.927:NE*T 

1110 PSET(128,94¡, liPRINTIl, "."iPSETIl 

30,98), 3iDfiAI(-el04,l58-:PRINTIl, -c.de 
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curvatura" 

1 120 PSET ( 101 , 94) , 1 : PRINTI1 , ' ■ ■ : PSETI 1 
Í3,?B) ,3:DRftN"«83, 168" ¡PRINTtl , V dco p 
rincipal" 

1131 PSET ( 17 1 , 66) , 3 : DR AH" d3fc 4d3fl 1 u3f 

c3u30il50,20u8":PRINTIl," objeto" 

1 140 PSET ( 17 1 , 661 , 1 1 : DRflWCU 1 122i235, 

167clil71,126clU122i235,25clil71,65cl 

la6f,15f* 

1150 PSET(171,127),11:DRA«-|60,42" 
1160 PSET(120,8B>,4:DRA«'"dBc3d811u8c4u 
8c3i95,40uB":PRINTtt," iiagen" 
1170 SOSUB 20 

11B0 I»=INK.EY»:1F I«<>" " THEN 1180 
1190 ' 

1200 'Hit dibujo espejo conviioltll 
1210 ' 

1220 CLS:L1NE(20. 961-1235,96), 6:F0R 1= 
25 TO 28:CIRCLE(I,96),B0,5,5.4978,.785 
4:NEXT 

1230 PSET (16, 8) , l:PRINTtl, "ESPEJO CONV 
EJO" 

1240 PSET (22.941 , 1 : PRINTtl , " • "¡ UNE (24 
,971-142, 166), JsPRINTIl, "centro de cur 
vatura" 

1250 PSET(47,94),l:PRINTtl,".":LINE(49 
,97>-(í7, 157), 3:PRINTtl, "foco principa 
1" 

1260 PSET ( 150, 66) , 3: DRAN"d30c4d30r lu30 

C3u30cllil06,76c3i24,96" 

1270 PSET(150,65),l:DRAN"clll49nc3i20, 

115cl!il82,17" 

1280 PSET ( 150, 126) , 1 1 : DRAN"149nc4i20, 7 
7cllil4B,155cli!50,126cl!il06,116c4»24 
,96" 

1290 PSET170,96),3:DRA»"ulllldlIc4dllr 
lultc3i20,40uB":PRINTtl," iiagen":PSET 
(155,75), l:PRINTtl,"4-objeto" 
1300 GOSUB 20 

1310 lWNKEVIrlf !«<>" "THEN 1311 

1315 ' 

1320 'tu vocabulario Ul 
1325 ' 

1330 60SUB 30 

1340 PRINT:PR1NT"EJE PRINCIPALES la 1 
mea recta inde-finida (rojo) gue une 
los centros de curvatura de sus caras. 

1350 PRINT:PRINT"CENTRO DE CURVATURA: E 
s el de la esfe-ra al gue pertenece el 

casquete y centro de figura al pol 
o del casque- teicualquier recta gue n 
o sea el eje principal y que pase por 
el c.de cur-vatura y por un pun'i 
1360 PRINT'to del espejo se llana eje 

secundario." 



1370 PRINTtPRINT'FOCO PRINCIPALES el 
punto de su eje principal donde se reu 
nen los rayos gue llegan al espejo pa 
ralelos a di- cho eje, después de refle 
jarse (esp. cóncavos), o sus prolongac 
iones [(azul y verde) espejos convesos] 

13B0 PRINT:PRINT"PULSA space PARA CDNT 
INUAR" 

1390 I»=INKEYf:IF I«<>" " THEN 139» 
1400 G0SU8 31 

1410 PRINT:PRINT"VIRTUAL: liagen situad 

a detras del es-pejO":PRINT:PRINT"REAL 

: Imagen situada entre el objeto o déla 

nte de el y el espejo." 

1420 PRlNT:PRINT"PEFLE«ION:Caibio de d 

ireccion que ex-pen«enta la luz al in 

cidir o chocar contra una superficie q 

ue no le deja pasar" 

1423 PRINT:PRINT"Pulsa «A» para verlo 

de nuevo. ":PRINT"Puisa SPACE para volv 

er a eipeiar." 

1425 I$=INKEY«;1F «*■ " THEN 70 
1427 IF I«=V OR I»'"A" THEN 980 ELSE 
1425 

1430 LINE(159,69)-(248,164),4,BF¡PSET( 

163,B8),4:PRINTtl,"l-FUERZAS":PSET(163 

,112),4¡PRINTI1,"2-PALANCAS":PSET¡163, 

136).4:PRINT«1,"3-F0RHULAS" 

1440 I*=INKEY«: IF !«•" THEN 1440 

1450 IF IS="1" THEN 1490 

1460 IF I*=-2" THEN 1730 

1470 IF I$="3" THEN 2030 

1480 IF ItÜ'V OR I«(>"2" THEN 1440 

1490 ' 

1500 Hit fuerzas resultantes Ittl 
1510 ' 

1520 SCREEN 0:CLS:COLOR 1.3,3:KEY OFF: 
PRINT : PRINT ■ «MU FUERZAS 
IUU":PRINT:PRINT"Dibuja las fuerzas 
con las teclas de control del cursor. 
Pulsa SPACE cada vez que dibujes una 
y RETURN cuando hayas dibujado todas. 

1530 PRINT'En aiarillo te saldrá la re 
sultante (todas las fuerzas tiran de 
un lisio punto y has de hacer ias de u 
na).":PRINT:INPUT "¿Cuantas fuerzas va 
s a hacer';Z 

1540 DIN AlZliüIH B <I) : flX=128: A¥=96: X= 

AX:Y=AY:R=1:SCREEN 2:C0L0R 4,15,1:CLS 

1550 I«=INKEY1:ST=STICK(0> 

1560 LINEIAX, A¥)-(X,Y) , 15 

1570 IF I«=" " THEN SOSUB 60 

1580 PSET(10,2),15:IF R>Z THEN PRINTtl 

, "Pulsa RETURN" : IF IS=CHR«(13) THEN 14 




50 

1590 IF ST=0 THEN 1600 

1600 IF ST=I THEN Y=Y-1 

1610 IF ST=3 THEN X=X*1 

1620 IF ST=5 THEN ¥=V+l 

1630 IF ST=7 THEN X=X-1 

1640 UNE (AX,AY)-(X,Y),5:60TO 1550 

1650 X=128+A(l) : Y=96+B( 1) :P5ET(X, Y) 

1660 FOR 1=2 TO IiH«A(J)lVY«B(ÍI 

1670 UNE - ( X+XX , Y+YY) , 6: X»XX+X : Y=YY*Y 

¡NEÍT 

1680 LINE-(128.96),11 

1690 PSET(10,166),15: PRINTtl, "Pulsa < 

A» para calcular una nueva fue 

rza":PSET(10, 183), 15:PRINTU, "Pulsa SP 

ACE para volver al tenu" 

1700 I«=INKEY»:IF I«="a" OR I*="A" THE 

N ERASE A,B:60T0 1520 

1710 IF I«=" " THEN 70 ELSE 1690 

1715 ' 

1720 'MUI palancas U«U 
1725 ' 

1730 KEY OFF:CLEAR¡SCREEN 0:COLOR 15,4 
,7;L0CATE 16, 3: PRI NT"«ENU": LOCATE 6,9: 
PRINT'l-Palanca de priier genero":LOCA 
TE 6,12:PRINT"2-Palanca de segundo gen 
ero" ¡LOCATE 6, 15:PRINT"3-Palanca de te 
rcer genero":LOCATE 6, 18:PRINT"4-Foriu 
la de la palanca' 

1740 LOCATE 6,19:PRINT"Fi.Bi = Fr.Br'i 
INPUT G: IF G<1 OR B>4 THEN 1740 
1745 ON 6 SOTO 1750, 1B20, 1870, 1910 
1750 'IU palanca priier genero tu 
1755 ' 

1760 SOSUB 4» 

1778 PRINTtl, "PALANCA DE PRIMER GENERO 
■:CIRCLE(75,96),8,5¡PAINT(75,96),5 
1780 PSET(85,961,6:DRAN"fl5il75,115u5i 
100,106i90,96H00,86il75,B2u5il00,81gl 
5" 

1790 FOR 1=10 TO 15 STEP 5:CIRCLE(75,9 
6), I,6,3.927,0:CIRCLE(75,96), 1,6,0,2.3 
562:NEXT 
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1800 LINEI65, 861-168, 98), 6;LINE(65, 106 
1-168, 182), 6:PAINT(75, 1871, 6:PAINT(86, 
96),4:PAINT(1BB,82),4 
1BI8 LINEI89, If3)-(94, 130) , 1: PRIHTtl, * 
Punto de apoyo":PSET(44,94):DRAN"128u3 
0':PRINTtl, ■ Resi stencia" : PSET ( 148, 74) 
:DRAN"il40,54u8":PRINTIl, "Fuerza lotri 
l'tíOIO 199» 
1815 ' 

1828 'III palanca segundo genero III 
1B25 ' 

1838 G05UB 48 

1848 PRINTI1, 'PALANCA DE SEGUNDO SENER 

0 , ¡PSET(85,95),8:DRAN , t98,88i8e,65r58n 

r20dl0i90,B8"¡PAINT(95,75),8 

1858 PSET(85,65),14:DRAN-iie8,48il25,6 

5i85,65":PAINT(U8,55),14:CIRaE(85,95 

),10:PAINT(85,95):CIRCLE(B5,95),4,15:P 

AINT (85,951, 15 

1848 PSET CSS, 107 ) , 1 1 : PRINTtl , Punto 
de apoyo" : PSET ( 1 10, 40} , 1 1 : POINTtl , * 4 R 
esístencia":PSET( 13é,¿8) ,ll:PRINTtl, 
Fuerza iotriz":60T0 1998 
1865 ' 

1878 'III palanca tercer genero III 
1875 ' 

1888 SQSUB 40 

1898 PRINTIl, "PALANCA DE TERCER 6ENER0 
': PSET 1 200, 88) , 4: DRAN'i40, 75d40i280, 1 1 
0u 1 i4 1 , 1 1 4u 1 9r 1 d 1 8n 1208 , 108u34i200 , 82n 
u2c8d25125u25r25 , :PAINT(198,180),8 
1900 LINEI40, 951-130, 145) ¡PRINTIl, "Pun 
to de apoyo , :PSET(130,120),10:PRINT01, 
".Fuerza iotriz":LINE(190,78)-(150,50! 
¡PRINTIl," ResÍ5tencia"¡60TO 1990 
1985 ' 

1918 'III fonula de la palanca III 
1915 ' 

1928 GDSUE 50 

1938 CLEflR:PRINT:PRINT:INPUT-¿FUERZfi (I 
OTRIZ (nn) ";FH$: INPUT "¿BRflíO MOTOR (■) 
";BH$: INPUT'FUERZA RESISTENTE (n»)";FR 
«¡INPUT'BRAZO DE RESISTENCIA d)";BR» 
1948 IF FW="5" THEN PRINT¡PRINT"LA FU 
ERZA «OTRIZ ES DE: '¡PRINT; (VAL(FRI)IVA 
L IBRD ) /VALÍ BM) "nentons" 
1950 IF 8M<=V THEN PRINT:PRINT"EL BR 
AZO MOTOR ES DE;"¡PRINT; (VAL1FR«)IVAL( 
BR«))/VAL(FH«)" t etros" 
1948 IF FR«=V THEN PRINT:PRINT"LA FU 
ERZA RESISTENTE ES DE: -SPRINT; (VALIFM 
>IVAL(BM))/VAL(BR«)"nei.tons" 
1970 IF BR«="s" THEN PRINT: PRINT'EL BR 
AZO RESISTENTE ES DE: "¡PRINT; (VAL(FM) 
»VBL(BM«1 ) /VALÍFR4I ■■etros' 
1988 PRINVPulsa i A » para volver al 
ienu';PRINT:PRINT"Pulsa SPACE para v 
olver a ei-pezar":60T0 2000 
1990 PSETI5, 155) ¡PRINTIl, "Pulsa « A » 
para volver al «enu" ¡PSET (5, 165) : PRINT 



II, "Pulsa SPACE para volver a ei- p 
ezar" 

2888 I1=INKEY«:IF I«="a" OR tt»"«* THE 
N 1730 

2818 IF I«=" " THEN 78 ELSE 2000 
2020 ' 

2030 'III fonulas til 

2035 ' 

2040 SCREEN 1:CLS:C0L0R 1 , 9 , 1 1 : PRINT" 
PROBLENftS": PRINT" 



2050 PRINT'iflue fonula escoges para": 
PRINT" resolver tu probleia?" 
2060 PRINT:PRINT"I-VELOCIDAD 
(V-E/T)" 

2070 PRINT"2-ACELERACI0N (A=F/ 
HI":PRINT"3-ACELERACI0N (A=Vf-Vi/T 
1" 

2080 PRINT'4-PES0 (P=N. 
6! ":PRINT"5-E, CINETICA IEC=1/2.N.V 
)":PRINT"6-E. POTENCIAL (EP=M.6.H) 
":PR1NT"7-TRABAJ0 IN=F.DI" 
2898 PRINT'8-POTENCIA (P=N. 
T)":INPUT I:IF Kl OR I>8 THEN 2030 
2100 ON 1 EOTO 2110,2210,2288,2368,243 
8,2588,2588,2650 
2110 ' Fon. velocidad 
2120 EOSUB 50 

2130 CLEAR¡PRINT:PRINT¡INPUT"¿VELOCIDA 
D li/segl";V«;INPUT "¿ESPACIO li)";E«¡ 
INPUT'iTIENPO (seg)";T$ 
2140 IF Vl»*s" THEN PRINT'LA VELOCIDAD 

ES:"¡PRINT¡VAL(E«l/VAL(T«)"i/seg" 
2150 IF E$="s" THEN PRINT'EL ESPACIO E 
S DE: "¡PRINT; VAL (V«) IVAL(TI) "letros 
2160 IF T«="s" THEN PRINT'EL TIEMPO ES 
:":PRINT;VAL(E*I/VAL(V») "segundos" 
2170 PRINT:PRINT:PRINT"Pulsa «A> para 
hacer un nue- vo calculo" ¡ PRINT: PRINT" 
Pulsa SPACE para volver a M-pizir' 
2180 I«=INKEVI:IF I«=""THEN 2180 
2190 IF I$="a'0R I«='A" THEN 2040 ELSE 

2200 

2208 IF 1»=' "THEN 70 ELSE 2180 
2210 ' fon. aceleración I 
2220 GOSUB 50 

2230 CLEAR: PRINT: PRINT: INPUT'tACELERAC 

ION («/seg)";A»:INPUT"¿FUERZA ln«)':F« 

:INPUT'¿MASA (kg)';M$ 

2240 IF Al='s" THEN PRINT:PRINT"LA ACE 

LERACION ES OE:":PRINT;VAL(F«)/VAL!H«) 

i'i/seg" 

2250 IF Fi="s" THEN PRINT: PP INT"LA FUE 
RZA ES DE: " : PRINT; VAL ( A») IVflL (11* ) ; "new 
tons" 

2260 IF H»="s" THEN PRINT:PRINT'LA HAS 
A ES DE:":PRINT;VAL(F«)/VALIA«)'kilogr 
aaos" 

2270 60T0 2178 

2288 ' fon. aceleración II 



2290 EOSUB 50 

2300 CLEAR:PRINT: INPUT "¿ACELERACION (• 
/seg)";At:INPUT'¿VELOCIDAD FINAL li/se 
g)";VF«:INPUT"¿VELOCIDAD INICIAL (i/se 
g)';VI*:INPUT'¿TIEHPO (seg)";T« 
2310 IF A«="s" THEN PRINT : PRINT'LA ACE 
LERACION ES DE:":PRINT; (VAL (VF$) -VAL ( V 
l»))/VAL(T»)"i/seg" 

2320 IF VF«="s" THEN PRINT: PR INJT"LA VE 

LOCIDAD FINAL ES DE: ": PRINT; VAHVI») +V 

AL(A$)IVAL(T»)"i/seg" 

2330 IF VI»*'s" THEN PR INT: PRINT'LA VE 

LOCIDAD INICIAL ES DE: ": PRINT; VAL (VF«) 

-VAL(A»)IVAL(T«l"i/seg" 

2348 IF T«="s" THEN PR INT : PRI NT"EL TIE 

NPO ES: ":PRINT; (VAL ( VF») -VAHVI*) ) /VAL 

(A«l"seg" 

2358 GOTO 2178 

2360 ' fon. peso 

2378 GOSUB 50 

23B0 CLEAR:PRINT:PR1NT:INPUT"¿PES0 ln« 
)";P»¡INPUT"¿HASA (kg) ';(!«: INPUT'¿GRAV 
EDAD (i/seg)';GI 

2390 IF P»='s" THEN PR INT: PP INT "EL PES 
O ES DE:':PRINT;VAL(N«)IVAL(G»)'ne»ton 

5" 

2400 IF H«=V THEN PR INT : PRINT"LA HAS 
A ES DE:':PRINT;VAL(PII/VAL!6«)'kilogr 
uos* 

2410 ¡F G«="s" THEN PRINT : PRINT'LA GRA 
VEDAD ES DE:":PRINT;VAL(P»l/VALIMI'i/ 
seg" 

2420 60TO 2170 

2430 ' fon. energia cinética 
2440 GOSUB 50 

2450 CLEAR: PRINT: PRINT: INPUT"¿ENERGIA 

CINETICA (J)";EC4:INPUT"¿HASA (kgl";M 

:INPUT"¿VELOCIDAD li/seg)";V« 

2460 IF EC«='s' THEN PRINT: PR INT'LA EN 

ERGIA CINETICA ES DE: ": PRINT; (fl/2) «VA 

L(H$))IVAL(V«r2')Ulios" 

2478 IF H»="s' THEN PRINT: PRINT'LA HAS 

A ES DE:":PRINT;VAL(ECt)/((I/2)IVAL(V* 

) A 2) 'kilogramos' 

2480 IF VM's' THEN PRINTlPRINT'LA VEL 
OCIDAD ES DE:":PRINT;SQR(VAL(EC*)/(VAL 
(Ht)t( 1/2)1 l'n/seg' 
2490 60TO 2170 

2500 ' fon. energia potencial 
2510 GOSUB 58 

2528 CLEAR: PRINT: INPUT'¿ENERGIA POTENC 
IAL (J)";EP«:INPUT'¿NASA (kg)';H«:INPU 
T'¿6RAVEDAD Il/ftfl'gMi INPUT"¿ALTURA 
Ii)*lH0 

2530 IF EP»="s* THEN PRINT:PRINT"LA EN 

ERGIA POTENCIAL ES DE:"¡PRINT;VAL(H»)I 

VAL(G«)IVAL(H«)'Julios" 

2540 IF H*="s" THEN PRINTlPRINT'LA HAS 

A ES ÜE:':PRINT;VAL(EP«)/(VAL(6»)«VAL( 

HUI "kilogramos" 
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255» IF 6«=V THEN PRINT¡PRINT"LA GRA 
VEDAD ES DE:"¡PRINT¡VAL(EPI)/tVAL(N»)t 
IM.IHM I "•/««" 

25*8 1F H«="s" THEN PRINT:PRINT"LA ALT 

URA ES BE:':PRINTiVALCEP*)/(VAL()l*)IVA 

LI6«))"Mtros" 

257» SOTO 2178 

2580 ' fon. trabajo 

25?» SOSUB 58 

26ÍÍ CLEAR:PRINT:PR1MT:INPUT'¿TRABAJ0 

(J)";N»:lNPUr¿FUERZA ln«) -;F»¡ INPUT't 

DESPLAZAMIENTO |D'|M 

2618 IF M="s" THEN PRINT:PRINT"EL TRA 

BAJO ES DE: -:PRINT;VAL(F$) IVAL(B«) "Jul 

ios" 

2628 IF Fs="s" THEN PPINT: PRINT"LA FUE 
RIA ES BE: " : PRINT} VAL /VAL (Bt> 'ne»t 
ons" 

2638 IF D«=V THEN PRINT:PRINT"EL DES 

PLAZAMIENTO ES DE:':PRINT;VAL(«)/VAL( 

FS) "tetros" 

2648 BOTO 2178 

2658 ' fon. potencia 

266» SOSUB 5» 

2678 CLEAR:PRINT:PRINT:INPUT"¿POTENCIA 
I»)-;P*:1NPUT-¿TRABAJ0 (J) ";«: INPUT" 
¿TIEMPO '.seg»";T« 

168» IF P«="s" THEN PRINT : PRI NT"LA POT 
ENCIA ES DE: " : PPINT ; VAL ( W*l /VALíTf) "na 
tíos" 

2698 IF M="s" THEN PRINT:PRINT"EL TRA 
BAJO ES DE: -:PRINT; VAL (P«> tVAL IT») "Jul 
ios" 

2788 IF T»="s" THEN PRINT: PR INT"EL TIE 
MPO ES DE: ": PRINT; VAL («») /VAL (P*í "icgu 
ndas " 

2718 6OT0 2178 
2728 ' 

2738 'II» filia nuclear Itl 
274» ' 

2758 SCREEN 2,8:C0LOR 1.15.15:CLS 
276» * 

2778 •lili definición sprites lili 
278» ' 

279» PSET(16,8),15:PRINT»1,"UN MOMENTO 
, POR FAVOR" 

28»» FOR W TO 1B:A»»" 
281» RESTORE 321» 

2828 FOR J«l TO 8:READ B«:A»=A$+CHR»(V 

AL("lH"*Bl)):NEIT J 

283» SPRITE»(II=A«:NEXT I 

2848 CLS: PSET ( 16, 8) , 15: PRINT»! , "REACC1 

ON EN CADENA" 

285» PSET(2»,2»),15:PRINT»l,"Ro J o:neut 
ron":PSET(2í,28),I5:PRINTIl,"Verde:pro 
ton" 

286» LINEI152,26)-I248,1B»),11,BF 



2B7» ' 

2B89 'lili colocación sprites lili 
28?» ' 

29Í» RESTORE 323» 

291» FOR 1=8 TO 5:READ A,B:READ C:PUT 
SPRITE M.(A,B),C,I:PUT SPRITE 1+7, (A 
*58,B-58),C,I*6:PUT SPRITE IM3,IA*5«, 
l>3#),C,I+l2:KXf I 
2921 ' 

2938 'lili aoviiiento neutrón lili 
294» ' 

2958 FOR 1=38 TO 62 STEP 8-.READ A«:PSE 
T(168,II,11:PRINTI1,A«:NEIT I 
2968 FOR 1=28 TO 85:PUT SPRITE 8,11,98 
l,6,IB:F0R 11=8 TO 58:NEIT X:NEXT I 
297» SOUND 6,15:S0UND B,15:S0UND 7,55 
2988 RESTORE 3278 

2998 FOR M TO 5:READ A, B: READ C:PUT 
SPRITE M,IA-5»,Bt5»).C,I:NE¡(T I 

3«»8 PSET(75,45),15:PRINTI1,-CAL0R":PS 
ETI75,1351,I5:PRINT«l,'CALOR":F0R 1=1 
TO 5»8:NEXT 

381» SOUND 8,7:SOUND 7,63:RESTORE 329» 
3»2» FOR 1=7» TO 166 STEP 8: READ A«:PS 
ET(16»,I),11:PRINT»1,A4:NEXT 
ZdZt x =B8: J=?5 

314» FOR 1=85 TO 135:PUT SPRITE »,(I,* 
),6,1B:P0T SPRITE 19, II,J),6,18:F0R 2= 
» TO 5«:NEXT 1: M-li J=JH:NEXT I 
3»5« SOUND 6,I5:S0UND 8,I5:S0UND 7,39 
3(6» ' 

3»7» 'lili partición 2 atoaos lili 
3«8» RESTORE 327» 

3Í9» FOR 1=6 TO 17: READ A,B:READ C:PUT 



SPRITE W,(Ai»),C»Il«n I 
318» FOR 1=1 TO 588:NEXT I 
311» SOUND B,7:S0UND 7,63 
3128 PSET ( 18, 174 1 ,15 ¡PRINT» 1, "Pulsa «A 
» para verlo de nuevo d SPACE para v 
olver a eipezar." 
313» I*=INKET«: IF I»=" " THEN 7» 
3148 IF I«="a" OR !>**■ THEN 2728 ELS 

E :::» 
315» • 

3168 'lili datos lltll 
317» ' 

318» 'lili rellenados lili 
3198 DATA 68, 13», 48,78, 25,78,48,48,65, 
71,16,68,8»,69.97,124,1»2,126,8Í,82,11 
1,125,71, 86,89, B8,51, 25,56,24,97,1(9,6 
2,56,114,75,114,84,114,97 
32»! lili datos sprites Hit 
3218 DATA 3B,7c,fe,fe,fe,7c,38,8» 
3228 'lili 3 atónos lili 
3238 DATA 85,92,6,87,88,12,98,92,6,83, 
89,6, 82, 93, 12, 86, '5, 12 
324» 'lili texto lili 
325» DATA Un neutrón, choca con-, Ira un 
ato-,io y lo di-,vide. 
326» 'Hit 2 atoaos div. tttt 
3271 DATA 131,22,4, «3,27 f!i,!»!lM, 
136,59,6,134,54,12,139,55,12,138,122,6 
,133,127,12,139,126,6,136,159,6,134,15 
4,12,139,155,12 
328» lili texto lili 
329» DATA Dos nuevos, neutrones, se sepa 
ran,y se diri-,gen hacia, otros ato-,io 
s divi-,diendol05,de nuevo, Y el proce- 
do sigue, repitiendo-, se ... 
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TEST DE LISTADOS. Para usar el Test de Listado que publicamos al final de cada programa debe cargarse el programa correspon- 
diente publicado en nuestro número 7 del mes de noviembre, pig. 28. 



' i 


- 5B 


290 


-229 


581 


- 73 


890 


- 8 


121» 


- 38 


1481 


-144 


1770 


-131 


20:5 


- 58 


234» 


- 58 


26?» 


-124 


3(21 


-18" 


2 


- 58 


3(0 


-162 


590 


- 61 


900 


- 11 


1211 


- H 


1491 


■ 38 


1780 


- 72 


2»4» 


-157 


237» 


-2«5 


27»» 


- 58 


3»3» 


-143 


3 


- 58 


310 


-238 


600 


-236 


910 


-185 


122» 


- 2» 


15»! 


- 58 


179» 


-154 


2»3I 


- 36 


238» 


- 70 


271» 


- 25 


3(4( 


-1B4 


4 


- 58 


320 


-252 


610 


- 99 


920 


-248 


1231 


- 13 


151» 


- 58 


1800 


-159 


214» 


- 53 


239» 


- 49 


272» 


- 58 


3Í5Í 


-254 


S 


- 58 


330 


- Si 


620 


- 92 


930 


-152 


124» 


-179 


1521 


- 47 


1810 


- 84 


2»7» 


- 90 


24»» 


- 47 


273» 


- 5B 


3Í6» 


- 58 


11 


-231 


340 


- 58 


630 


-235 


940 


- 58 


125» 


- 45 


153» 


-147 


1815 


- 58 


2(8» 


-202 


241» 


- 2 


274» 


- 58 


3Í7» 


- 56 


20 


-184 


350 


- 58 


440 


- 96 


950 


-120 


124» 


- 37 


154» 


-228 


1820 


- 58 


219» 


-128 


242» 


- 23 


275» 


-139 


3(8» 


-108 


30 


-222 


360 


- 58 


65» 


-175 


960 


-21? 


127» 


- 47 


155» 


- 27 


1825 


- 58 


211» 


- 2 


2431 


- 58 


274» 


- 58 


3Í9Í 


- 64 


40 


- 12 


370 


- 54 


660 


- 26 


970 


- 52 


128» 


-190 


136» 


-201 


1830 


-I9S 


211» 


- 58 


244» 


-205 


277» 


- 58 


31»» 


-188 


50 


-131 


380 


- 75 


670 


- 58 


974 


- 58 


129» 


-190 


137» 


-220 


184» 


-241 


212» 


-205 


245» 


- 67 


278» 


- 58 


311» 


-177 


M 


- 41 


390 


- 39 


680 


- 58 


975 


- 5B 


13»» 


-175 


158» 


-140 


1850 


-201 


2131 


- 12 


246» 


-182 


27?» 


-142 


312» 


-212 


70 


- 58 


400 


-177 


6°0 


- 58 


980 


- 58 


• 131» 


-147 


159» 


- 96 


1860 


-108 


214» 


- 4 


2471 


- 64 


28»» 


-151 


3131 


-21° 


80 


- 58 


410 


- 17 


"00 


- 99 


9°0 


- 58 


1315 


- 38 


14»» 


-178 


1865 


- 58 


215» 


-168 


248» 


- 27 


281» 


- 48 


3149 


- 37 


9» 


- 5B 


420 


- 58 


710 


-202 


1000 


- 58 


132» 


- 58 


141» 


-177 


1370 


- 58 


216» 


-218 


249» 


- 25 


282» 


-164 


315» 


- 58 


100 


- 40 


43» 


- 27 


720 


-235 


1010 


-221 


1323 


- 58 


142» 


-181 


1875 


- 58 


217» 


-228 


:ím 


■ SI 


283» 


-223 


316» 


- 58 


110 


-135 


440 


-224 


730 


-206 


1020 


- 88 
-117 


133» 


-185 


143» 


-182 


1880 


-195 


218» 


- 33 


251» 


-205 


284» 


-125 


317» 


- 58 


120 


- 7» 


450 


-240 


740 


- 13 


1030 


1341 


- 17 


1441 


-166 


1890 


-126 


219» 


-212 


252» 


- 97 


285» 


-113 


318» 


- 56 


130 


- 86 


460 


-179 


750 


-148 


1040 


-210 


135» 


-165 


163» 


- 28 


1900 


- 43 


22»» 


- 8? 


253» 


-128 


284» 


- 47 


319» 


-124 


14» 


-170 


464 


- 58 


7 60 


- 4 


1050 


-175 


134» 


-225 


144» 


-10- 


IMS 


- 58 


221» 


- 5B 


254» 


- 2B 


287» 


- 58 


32»» 


- 38 


150 


-133 


465 


- 58 


77» 


- 43 


1060 


-172 


137» 


- 94 


1471 


- 11 


1910 


- 56 


222» 


-2Í5 


255» 


-219 


288» 


- 58 


321» 


-131 


160 


- 79 


466 


- 58 


"80 


- 72 


1070 


- 58 


138» 


- 8 


1680 


- 98 


1915 


- 58 


223» 


-164 


256» 


- 37 


2B?» 


- 58 


322» 


- 36 


170 


-187 


470 


76 


790 


-178 


1080 


- 58 


139» 


-247 


149» 


-14» 


192» 


-2»5 


224» 


- 3 


257» 


- 25 


29Í» 


- 66 


323» 


- 64 


18» 


-177 


480 


- 5» 


800 


-131 


1090 


-224 


14»» 


-185 


17»» 


-218 


IWl 


- 11 


225» 


-238 


238» 


- 58 


291» 


- 81 


324» 


- 58 


19» 


- 78 ■ 


490 


-177 


810 


-175 


1100 


-137 


141» 


-114 


171» 


- 89 


1940 


- 95 


224» 


- 51 


259» 


-205 


292» 


- 58 


325Í 


- 8 


200 


-141 


500 


- 72 


820 


-187 


1110 


- 74 


1421 


-184 


1713 


- 58 


I9SI 


- 74 


227» 


- 25 


24»» 


-166 


2?3» 


- 58 


326» 


- 38 


210 


-218 


510 


-128 


825 


- 58 


1120 


- 31 


1423 


-120 


172» 


- 58 


196Í 


-128 


226» 


- 58 


241» 


- "8 


2?4» 


- 58 


327» 


-111 


220 


- 75 


520 


- 28 




- 58 


1131 -233 


1425 


-219 


1725 


- 58 


W7I 


-193 


22?» 


-215 


242» 


-193 


2958 


-118 


328» 


- 58 


230 


- 14 


530 


-224 


635 


- 53 


1140 


-141 


1427 


-162 


173» 


-148 


1980 


-243 


23»» 


-198 


2431 


-164 


2?6» 


- 19 


32?» 


- 13 


240 


- 91 


540 


- 58 


840 


-185 


1150 


-110 


143» 


- 7» 


174» 


-194 


19»» 


-190 


231» 


- 17 


264» 


- 25 


2?7« 


- 14 






250 


-205 


550 


- 58 


850 


-187 


1160 


-149 


144» 


- 58 


1745 


-242 


2000 


-150 


232» 


-157 


265» 


- 58 


298» 


-108 






26» 


-121 


560 


- 58 


860 


- 78 


1170 


-175 


145» 


- 27 


175» 


- 53 


2010 


- B9 


233» 


- 45 


266» 


-205 


2??» 


-16= 






270 


- 15 


564 


- 58 


870 


-153 


1180 


- 34 


1441 


- 13 


1755 


- 58 


2020 


- 56 


234» 


-168 


267» 


- 36 


3»»» 


- 64 


TOTAL: 


:ee 


-217 


570 


- 85 


360 


-112 


1190 


- 58 


147» 


- 59 


174» 


-IW 


2030 


- 58 


235» 


- 25 


268» 


-234 


311» 


-1Í7 


31 
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SUSCRIBETE A VS& 

Suscribiéndote no sólo tienes la seguridad de tener todos los meses tu 
MSX CLUB DE PROGRAMAS en tu casa sino que recibirás 12 
números pagando sólo 10 



BOLETIN DE SUSCRIPCION MSX CLUB DE PROGRAMAS 



Nombre y apellidos 

Calle 

Ciudad 

D. Postal 



Deseo suscribirme por doce números a la revista MSX CLUB DE PROGRAMAS a partir del número 

que pago adjuntando talón a la orden de: MANHATTAN TRANSFER, S.A. - C/lRoca i Batlle, 10-12 - 08023 Barcelona 
Tarifas: España por correo normal Ptas. 2.250, — 

Europa por correo normal Ptas. 2.600,— 

Europa por correo aéreo Ptas. 3.250,— 

América por correo aéreo USAS 35USAS 
Importante: Colocar en el sobre: Departamento Suscripciones MSX CLUB. NO SE ADMITE CONTRAREEMBOLSO. 
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Programa i 



TIERRA 



Gracias a este corto mini-pro- 
grama podréis contemplar en 
vuestras pantallas una perfecta 
animación de la rotación de La 
Tierra. Los cinco continentes 
girando ante tus ojos. 



II ' Concurso Siníprsjrim 

28 ' (01.984 t Ameles t TIERRA 

31 ' 

41 CLEAR 3088 

58 COLORIS. I . 1 : SCREEN 2,2 

48 UlEIMl-tMS.mi.lS.D 

78 ' 

B8 ' 

98 1 POS1CIÜNAKIENT0 ESTRELLAS 
IÍ8 ' 

118 FOR 5«1 TD 158 

128 HZ^RÑD C« t2S5: VX'RND (6) tl91 : CZ^Rim 
18)114 

138 PSETHU,H),CJ 
148 NEXT i 
138 ' 
148 ' 



FOR 



TQ 



288 »»."¡F8R H=l TD 32 

218 READ A:A«=M*CHM(AI 

228 NEIT H:SPRITE*(m=A* 

238 KV S¡SPMTE»Ü2)*SPRITE*(1I 

248 ' 

25Í ' 

248 • FORMACION PLANETAS 
278 ' 

288 CIRCLEI 45, 981,9, 9, ,,1.2 

298 PAINT<45,98),9 

388 CIRCLE(88,48).2,14,,,1.3 

318 PAINTÍB8, 481,14 

328 CHICLE (141, 1851,3,2,,,! 

338 PAINT(!48,1B5!,2 

348 CJI!CLE(2S5,Í), 41,11 

338 PAIN'(254,l\Il 

348 • 

378 ' FOF-ACION T!ERSS 
388 1 

488 CISCl£(13¿,84), 25,4., ,1.2 
418 PAIN7(¡33. 841,4 



I ' ROTACION TIERRA 
l ■ 

X=!tí:Y=62:E=74¡H=74:fi=73:Z=l 
H=H* 1:6=8*1 
IFK=I54 THE» Z=Z*1 




'78 putsp c ite r,(K,rv,i,i 




71Í IF Z=4 AND 5=75 THEN GOTO 448 ELSE 


588 PUTSPPITE :,(H*14.YI,!,¡ 




EOTO 47» 


518 PUTSPRITÉ 2, (6+32, V), 1,2 




728 ' 


528 PUTSPRITE 3,(G'48.YU,3 




Bj ' 


538 PUTSPRITE 4,IH,Y*14),1,4 




748 1 DATAS NAPA HUNDI 


548 PUTSPRITE 5, (H*14,Y*141 ,1.5 




758 ' 


558 "¡JTSPSITE 4.(G'32, v *1í),1,4 




748 DATA 8.8,8,8.8,8,1,8,28,42.43,127, 


548 «Simri 7,:S*49,Y'!4),t,7 




255,127,223.15 


578 PUTSPRITE B,!H,Y*32),1,8 




778 DATA 8,8,8,8,8,44,24,94,44,8,141,2 






28,248,252,248,258 


l'f rDTS»ü!TE !Í,(E*32,Y»:2),1.1I 




7B8 DATA 8,8,8.44,94.2,8,8,88,252,252, 


488 F'JTS'FITE ¡2,(H*52.25I.I,12 




743.252. 12?, 1 12.33 






428 PUTSPRITE 14. ¡H'32,8) ,8. 12 




798 DATA 8,8.4,8,8,8,8,14,8,8.8,8,8,8, 


438 PUTSPRITE 21, «'12.1581,1,12 




192.192 


448 PUTSPRITE 22, (H*32,38),8. ¡2 




888 DATA 8.8,8,8,8,8,8,8,134,47,1,24,1 


458 PUTSPRITE 23. (H*32,75),í,12 




24,124.255,287 


448 PUTSPRITE 13, ;H*32, 188! ,8, 12 




818 DATA 8,8,8,8.8,8,8,8,33,7,15,39,55 


4í! AA1=IN>:EY(:IF AS«>" THEN eno 




.235, 155. 255 


442 COLORIS, 4. 4:C0L0R!5, 1,1 




823 DATA 8,8,8.8,8,128,18,8,138,183,25 


ft !F !»4 SF: !=8 THEN R.R-J 

482 !F K=15« AND INI (2/2) =1/2 THEN R=P 




5, 255. 255. 255, 255, 255 

B3Í DATA 8,8,8,8,8,i,8;129,rt,I84,252, 


-1 




252.248,252,258.248 


498 1F G=i2¿ THEN 6=«í 




848 DATA 7, 7, ¡5, 15, 31, 31, 15, 7, 3, 3, 1,8, 


■■es : c h=:;4 then h=r 




8,8.8,8 







¡¡OT JUEGO] 
QUE MATA!!] 







858 DATA 255. 255, 255,254,252. 232, 200, 1 
2", 4, 8?. 194,224, 124,38,63, 127 




,8 

930 DATA 127,63,31,31,31,15,38,38,12,3 


B6Í MTÁj,l,l,f, 1,1,1, 1,1,1,1,1,1,1,1 






.0 




940 DATA 22 £ , 192, 128, 192, 128,0,0, 0,0, 0 


878 DATA 1.8,16,147,183,3,15,14,68,3,1 




,0.64,32,8,8.0 


5, 95, 15?, 31, 13, 8 




950 DATA 2 0 0 0 ¿4 0,0. 0,0 0 0 8 8 0 


888 DATA, 159, 79, 255, 255, 255, 255, 167,47 




0.0 






960 CATA 126. 126, 126,252, 121, 120,43 0, 


m DA T A 255,255,255,255,255,255.255,1 






59, !«,243,225, 128,0, 16,136. 32 




970 jA T A ;£ ,8, 30. 192, 128,0 0,0.0 0 0 1 


900 DATA 255,255,255,255,255,255,255,2 




0 0 0 0 


55, ¡BE, 26, 24, 9, 12B, 17, 9,8 




988 DATA iá, í, 30,212, 128,0,0,0 0 0*0,0 


918 DATA 242,248,241,248,162,38,132,64 




,0,8,0,0 


,B, 34, 131, 184, 252, 254, 222, 9 




9°0 DATA 1&, 0, 38, 192, 128, 0,8, 0,0, 0,0,0 


928 DATA 8,8,4,1,8,4,8,0,8,0,8,8,8,8,8 
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- 58 


318 




470 


- 60 


620 




758 


- 58 


900 




20 


58 


178 


- 58 




-177 


4B0 




638 


-1B3 


768 


-169 


910 




30 


- 5B 


1B0 


- 58 


330 


-222 


490 


- e¿ 


640 


- 95 


770 


-125 


920 




'0 




190 


-194 


340 


- 21 


508 


- 98 


650 


-113 


7B8 


-121 


"f 


199 


50 


-16B 


20C 


-133 


350 


-161 


510 


- 83 


660 


-206 


790 


- 43 


940 




60 


- Bl 


210 




360 


- 58 


520 


-133 


661 


-185 


B00 


-155 


o !p 


94 


70 


- 58 


::t 


-126 


370 


- 58 


538 


-104 


662 


-238 


818 


- 69 


960 




90 


- 58 


230 


-166 


390 


- 58 


540 


-122 


670 


-179 


820 


- 29 


970 


94 


98 




248 


- 56 


400 


-190 


558 


-107 


663 


- 87 


B30 


-157 


980 




00 


- 58 


253 


- 58 


410' 


-118 


560 


-157 


690 


-155 


B40 


- 62 




94 


10 




260 


- 58 


428 


- 58 


570 


- 96 


700 


-2íá 


850 


-199 






20 


-194 


270 


- 53 


430 


- 58 


56? 


-114 


710 


-246 


B60 








38 


-187 


m 


- c 4 


Mi 


- 58 


598 


- 95 


720 


- 58 


878 


- 34 








GRAFICOS 



Consigue en tu pantalla 
hasta 72 gráficos diferentes 
gracias a este sencillo mini- 
programa. 



■ tit-iit-tiiinimt 

' t t 

' IGRAFICOSf 
' » I 
'I por I 
' « i 
' I David Pajares I 
' I I 

' tiiitiitnitumt» 

8 CLSslNPÜT-Nunro de gráfico inicial 

llOT'lAlí'IMMJ 
28 IF fl<l OR A>72 THEN 10 
30 COLOR 11,1,1: SCREEN 2 



40 OPEM"6RPi"»S01 

50 IF B=INT(B1 THEN C=710 ELSE C=1420 

60 PRESET(5,5):PRINTI1,A 

70 P5ET (128,1) 

80 FOR D=0 TO C STEP 10 

90 E-95IC0S(BIDI 

100 '=128*EISIN(D):Y=96-EIC0SID) 
110 LINE -II, V) 
120 NEKT 

138 IF STRIG(0)O-1 THEN 138 
148 B=80:A=AM 
158 IF B=36 THEN END 
168 CLS:60TQ 50 




La más rápida 
y completa batalla 
espacial 



Nombre y Apellidos: 
Dirección: 



Población: 

Provincia: 

□ Deseo recibir; 



El Importe de mi pedido lo hago efec- 
tivo mediante: 

D Cheque adjunto a nombre de: 
MSX CLUB DE CASSETTES 
C/RocayBatlle, 10-12, bajos. 
| 08023 Barcelona 



Programa»: 



■Por Antonio Caro Rodríguez i 



CONVOY-901 



Divertido programa en el que 
tienes que mantenerte el máxi- 
mo de tiempo posible sobre una 
carretera llena de obstáculos y 
peligros. Animáos. 



COMBOY-981 
Antonio Cano Rodrigue! 
(1987-Jaenl 



71 

80 COL0R > ?.S:CLS:SCflEEN1.2iHIDTH32:KEV 
OFF¡DEFINTA-Y 
90 ' ' iMtfutClMM" 
100 PRINT: PRINTTAB (3) : "MISION» " 
110 PPINTTABI5) i "Conducir un cosboy di 
cationes atravesando 

anís a un grupo ais- 
lado de la resisten- c 
ia aliada." 

!40 PR1NT!AS(3):"PELIGR0S:" 
150 PPINTTAB (5); "Bordes de la carrete- 
ra uñados, barreras 
y tinas en algunos di 1 
os tratos y posible- tinte • 

isiles." 

163 PRINTTAB(3)¡"REC0RRID0:' 

l'í PRINTTABlSIj'Distancia a recorrir, 

180 PRINTTAB(3)¡"«AtÉr1AL¡" 
190 PRINTTAB<5);"Unidad de transporte 
MI." 

200 FORI--0TO50001NEXT 
210 "Definición de caracteres" 
220 FQRN= 1600TO1655:READA: VPOKEN, A; NE 
n:F0PN.1664T0174!¡READAiVPOKEN,A¡NEI(T 
230 FOPN.1840TO1919|READA:VPOKEN,A|NE 
«Ti F0RN"1744T017S3: READAi VPDKEN, A, NE1T 
240 F0R»= 1 928TD1 95?: REAOA: VPDKEN . fl: ME 
«Ti F0RN"384T0463i READAi WPOKEN. Ai NEXT 
250 FORN*104BTOI 191 ¡ READAi WOKEN, Al NE 
IT: FORN» 1 264T0127?! READAi VPOKEN, At HEIT 
260 FORN=1360TO1367:READA:VrOKEN.A:NE 
XT: FDRM- I 44ÍT0I 447: READAi VPOKEN, A: NEIT 
270 FDRtf 132IT013271 READAs VPOKEK, A> NE 
XT: FORN=320TO335:READA: VPOKEN, A: NEIT:F 
ORN«2032TQ2039i READA: VPOKEN, A: NEXT 
280 VPOKEB208.254 : VPOKEB209, 254: VPOKE 
8210,254 

290 VP0KEB21 t , 2S2l VP0KES223. 196 




300 VPOKE82I3,1!9:VPOKEB2I4,3I:VPOKEB 
219,61 

310 VPOlf EBI "7 . 1 99: VP0KE82 18, 44 : VPOKEB 
219,44 

320 VPOKE8220, 134: VP0KE8221 , 134: VPOKE 

8222,134:VP0KE8217,23 

330 "Datas de caracteres" L 

340 DATA0.0, 0,0.0,0,1. 2,0,0,33, 54, 88,1 

16,151,149,64,64,255,64,64,73,85,73,0, 

0,255,0,16,2,213,82,0,1,2,4,8,16,16,15 

,192,32,32,72,20,10,0,255,0,0,0,132,23 

4,164,0,255 

350 ÍATA255, 255, 255, 255, 240, 240, 240, 24 

0,252,252,252,252,60,60,0,0,255,255,25 

5,255,240,240,240,240,252,252,252.252, 

60,60,60,60,240,240,248,248,252,252,25 

5,255,60,60,124,124,252,252.252,252 

360 DATA255, 255, 255, 255, 240,240, 240, 25 

5,252,252,252,252,60,60,56,240,240,240 

,240,248,124,63,31,15,60,60,60,124,252 

,248,248,224 

370 DATA240, 240, 240, 240, 255, 255, 255, 25 
5,0,0,60,60,252,252,252,252,240,240,24 
0,240,255,255,255,255,60,60,60,60.252, 
252.252,252,247,247,243,243,240,240,24 
0.240.188,188,60,60,60,60,60,60,255,24 
0,240,240,255,255,255,255,240,56,60,60 
,252,252,252,252 

380 DATA7, 15,31,62,124,248,240,240, 192 
,128,0,0,0,0,0,0,255,255,255,240,240,2 
40,255,255,252,252,252,60,60,60,252,23 
2, 255,255, 255, 240, 240,240. 240, 240. 252, 
252,252,60,60,60,60,60,255,255,253,15, 
15,15,15.15 



390 0ATA235, 0, 0, 0,0, 255, 255, 255, 252, 60 

,60,60,60,252,252,252,240,240,240,240, 

240,255,255,255,60,60,60,60,60,252,252 

,252,15,15,15,15,15,15,15,15 

400 DATA254, 254, 193, 198, 198. 198,254, 25 

4,14,14,6,6,6,6,6,2,254,126,6,254,254, 

192,252,254,254,126,6,126,126,6,126,25 

4,130,198,198,254,254,6,6,2,254,252,19 

2,254,254,6,126,254,254.252,192,254,25 

4,198,254,254 

410 DATA254, 254, 198, 134, 6,6, 6, 2, 254. 25 
4,196,254,254,198,254,254,254,254,198, 
254,254,6,126,254 

420 ÍATA240,240,240, 240,240,240,240.24 
0, 120, 120, 120, 120, 120, 120, 120, 120,60,6 
0,60,60,60,60,60,60,30,30,30,30,30,30, 
30,30,15,13,15,15,15,15,15,15,0,0,240, 
240,240,240,240,240,0,0,120,120,120,12 
0,120,120,0,0,60,60,60,60,60,60,0,0,30 
,30,30,30,30,30 

430 DATA0.0, 15, 15, 15, 15, 15, 15,240,240, 

240,240,240,240,0,0,120,120,120,120,12 

0,120,0,0,60,60,60,60,60,60,0,0,30,30, 

30,30,30,30,0,0,15,15,15,13,15,15,0,0, 

0,0,0,0,0,0,0,0,0,0,0,0,1,3,7,15,0,0,0 

,0,128,192,224,240,0,0,0,0,128,192,224 

,240,0,0,0,0,1,3,7,15 

440 DATA24,60, 102, 195, 153, 60, 102, 195, 1 

B9,126, 239, 251, 191. 247,126,189,66,231, 

189,153,66,231,189,153 

450 0ATA127,255,255,255,255,255, 56,16, 

252,230,227,235,255,254,56,16,255,255, 

255,255,255,255,255,255 

460 "Definición de sprites" 



24 



478 FORI=1T018:A»=":FORJ=1T032:READA: 
ft«=A**CHR*(fl) ¡ MEXT: SPRITE* ( II =A«: NEIT 
488 DATA4B , 144, 74, 156,208.237, 183, 53, 1 
89, 149,217,248,64, 168,224, 112, 145,214, 
68,142,172,38,68,232,146.63,9,3,38,29, 
15,6 

498 "Datas de sprites" 

580 DATA0, 0,0, 0,0, 8, 0,2, 2, 10, ó, 15, 191, 

95,31,15,0,0,0,0,0,8,0,16,96,192,246,2 

52,216,224,240,243 

510 DATA24, 60, 44, 44, 44, 44, 44, 44, 60, 126 
,231,195,129,0,0,0,0,8,8,8,8,8,8,8,8,8 
,0,8,0,0,0,0 

520 DATA0, 0,16, 16, 16, 16, 16, 16, 0,0, 24, 6 
0,126,60,24,8,0,0,0,0,0,0,0,0,0,0,0,0, 
0,0,0,0 

538 DATA0,64,255, 162, 170, 162, 186, 186,2 

26,127,63,15,0,0,8,0,0.2,255,37,181,18 

1,181,191,55,254,252,240,0,0,0,0 

540 DATA63, 63, 0,8, 8,8, 8,0, 0,0, 0,0, 0,0, 

0,0,252,252,0,0,0,0,0,0,0,0,0,0,0,0,0, 

0 

550 DATA0, 0,8, 93, 85, 93,69^69,29,0,^0,0, 
0,8,48,48,0,0,0,218,74,74,74,74,200,8, 

8,8,8,8,252,252 

560 DATA48.48, 63, 63, 0, 63, 63, 48, 48,63,6 

3,0,0,63,63,0,204,204.752,252,0,252,25 

2,12,12,252,252,0,12,252,252,0 

570 DATA0, 0,0, 0,0, 0,0, 0,8, 8, 0,0, 255, 25 

5,207,207,0,0,0,0,0,8,8,8,0,8,0,0,255, 

255,3,3 

580 DATA207,207,192,192,253,192,192.20 
7,207,192,192,255,255,192,192,255,51,5 
1,3,3,255,3,3,243,243,3,3,255,243,3,3, 
255 

590 "Presentación" 

600 FOR I =20010206: B*=B*+CHR« < I > : NEIT: B 

»=B**" , !FORI=208TD215:B»=B**CHR»(I):N 

EXT:B«=6«tCHR»(210l*CHR»l211l:FORI=216 

TO222:B«*B«*CHR«(II:NE](T:FORI=200TO286 

: B»=B«+CHRS ( I ) ¡ NEXT: F0RI=1 TD8: Bí =B*+" 

":NEXT:F0RI=23aT0237:B*=B*+CHF«( I) :NEX 



618 B«=B*»CHR»(232H-CHR«I233):F0RI=23B 

TD244: B*=B$+CHR« ! I > : MEXT 

628 CLS:L0CATE12,5:PRINTLEFT*(B«,7) 

638 PLAY'05T258BA6FEDC04BA6FEDC03CBA6F 

EDC02CDA6FEDC01CBA6FEDL1C" 

640 L0CATE12, 7:PRIKT"f > rescnta: " :FORI*f 

ntMiÉn 

658 LOCATE7,9¡PRINT!1ID«(B*,9,17):L0CAT 

E7,18:PRINTÍ1IMIB«,41,17) 

660 IF PLAVI8IO8THEN660 

670 "Colienzo del juego" 

680 Z=0:A=I:B=0:C=0:D=l:E=8:C¡<=96:n)i=9 

6¡nr-19«:EV«U2:VI-?iCLS 

698 PRINTB»: L0CATE8, 3: PRI NTSTRIN6* ( 15, 

1461 

700 C»=CHRI(48)*CNR»I41)»- '¡L0CAT£B,3 
: PRINTC*;: PRINTCS; : PRINTC»; : LDCATE24, 3 
:?mVU:M.lí' 

710 A»=STRIN6»I6,254)»CHR«(130»A)*STRI 

N6»(8,146)»CHR«!¡35*A*B!»STR1NE«(9,146 

l*CHR»(130»A)*STRINE«(6,254l 

720 LOCATE0,5:FORI=1TO15:PRINTA»; :NEXT 

730 PUTSPRITE3, (CX,96) , B, 3: FUTSPRITE6 , 

(CX,96),7,6:PUTSPRITE7,(C)(,96),15,7:PU 

TSPRITE9,(U,96),2,9:PUTSPRITE8,(CU1 

2I,15,8:PUTSPRITE10,(C1(,112I,2,10 

740 S0UND8,158:S0UND1,!:S0UND2,15B:S0U 

ND3, 2: S0UND4.8: S0UND5, 5:S0UND6, 15: SOUN 

D7, 56! SOUNDB, 6: S0UND9, 6: S0UND18, 6 

750 A«=STRINE» (6*C*E, 254) »CHP» 1 138«A) * 

STRINE»I8-E,146I»CHR«(I35»«'BI»STRIN6« 

(9-E, 146! +CHP* ( 138»A) ♦STRIK6» (6-C*E, 25 

4) 

768 L0CATE8, 5: PR INTCHR»(27I *V : LOCATE 

8. 5: PRIMA»! : IFB=8THENB=5ELSEB=8 

778 H= I NT ( RNÍ ( 1 ) «321 : IFVPEEK (6384*H1 ! 1 

69THENL0CATEH,3:PRINTCHR«(1«8)¡ 

788 0NSTICK(8IE0SUB968,968,938,°68.96B 

,960,940 

798 IFVPEEK (6528+INT (CX/S) ) >1490RVPEEK 
(6624*INT(CX/8> ) >1690RVPEEK (6S28+INT (C 
Í/B) »1 ) >1690RVPEEM6624t 1M (C('8) *l ) : 1 
69THEN1228 



888 Z=Z*.81:L0CATE13,8:L0CATE27,3:PRIN 
TUS!N6"il.ll" i Z:0NIM(ZI60SUB988,98í,! 
818, 1818, 1848. 1848, 1880. 1080, 1080. 1320 
810 IFZ=10RZ«20RZ=30RZ=40RZ=50RZ=5THEN 
E=E+1 

820 IFIM(RND(-Tl(tE!t2)=0THENB40 
B30 6OTD750 

840 IFIM(RND(1)I25I=0THEN D=-D 

850 IF D5THEND=-D 

860 IF C<-5THEND=-D 

870 IFD=ABS!D)THEN88BELSE900 

880 A=A«1 : IFA>5THENA=t:C=CH : A«=STPINS 

» (5+C+E, 254) +CHR$ ! 1 59' +EHR* ( 1 30tA ) +STR 

INES (8-E, 146)*CHR« ( 135+fl+B) >STRIN6«<8- 

E, 1461 tCHMI 1471 tCHRII|30«A)»STRlN6i(6 

-r>E,254):6OTO760 

890 EOTO750 

900 A=A-1:IFA<ITHENA=5:C=C-1:A»=STRING 
S (6*C*E,254) tCHRJI 130»A) *CHR« !148) +STR 
IN6«(7-E,146)*CHR«(135»A*B)*5TR:N6«(9- 
E, 1 46 1 »CHR« 1 1 30»A > *CHR» 1 1 58 1 *STR 1N6» ! 5 
-(¡♦E,254);60T076Í 
918 E0T0758 

928 "Itovmento de! callón" 
930 CX=CX*8:6OTO950 
940 CKX-8 

950 PUTSPRITE5,(CX,96),B,5:PUTSPFI T £6, 
(CX,9ó),7,6:PUTSPRITE7,(CI,96),15,7;PU 
TSFRITE?. <CX , 96) , 2. <? : PUTSPR I TE3, (CX,|! 
2;, 15, 8:PUTSPR¡TE18, (0,1121,2, 10 
960 RETURN 

970 "Colocación de las ninas" 
980 H1=INT(RND(1)I32):IFVPEEK(6304»H1) 
< 169THENL0CATEH1 , 5: PPINTCHR» ( 180) j 
990 RETURN 

1000 "Colocación de las barreras" 
1010 H2=INT(RNC(l>l32):IFvPEEK(63B4*H2 
) < 169ANDVPEEK (ó!87*H2) < 169ANDINT I PNCti 1 
H2l=0THENLOCATEH2,3:PRlMSTRlNGsi3,17 

1020 RETURN 

1030 "Colocación de barreras y unas' 
(Sigue) 



Test de listados 



10 


- 58 


138 


- 64 


250 


-140 


370 


-221 


491 


- 58 


610 


-247 


730 


- 21 


850 


- 21 


978 - 58 


1*91 


-210 


1218 


- 58 


1338 - 94 


20 


- 58 


140 


-1"? 


260 


-20B 


380 


-115 


500 


-184 


620 


- 84 


740 


-196 


m 


■ ? 


988 -216 


1100 


-21 J 


1228 


- 82 


1348 -221 


30 


- 58 


150 


- 73 


270 


-201 


390 


- 31 


510 


-116 


630 


- 14 


750 


-173 


870 


-163 


998 -142 


111? 


- 71 


122Í 


-237 


1350 -242 


40 


- 58 


160 


- 11 


280 


-248 


400 


-102 


520 


-107 


¿40 


-100 


761 


-156 


880 


-250 


1888 - 58 


1128 


-142 


1240 


-213 


1368 -133 


a 


- 58 


170 


-176 


2°0 


-102 


410 


- 26 


530 


-157 


450 


-239 


778 


- 77 


8?0 


-135 


1810 -226 


1130 


- 58 


1258 


- 18 


1378 -236 


u 


- 58 


130 


-177 


300 


- 7 


420 


-164 


540 


- 28 


cif 


- 27 


m 


-178 


"00 


-254 


1828 -142 


1148 


- 78 


1268 


-131 




70 


- 58 


190 


- 98 


310 


- 36 


430 


-120 


55í 


- 73 


670 


- 38 


798 


-178 


918 


-133 


1838 - 58 


1150 


-144 


1270 


- 72 




80 


-184 


200 


- 24 


320 


- 59 


440 


- 5 


560 


- 61 


680 


-218 


680 


- 8 


921 


- 58 


1848 - 64 


1161 


-213 


1288 


-131 




90 


- 58 


210 


- 58 


330 


- 58 


450 


- 62 


570 


- H 


698 


- 74 


810 


-228 


«30 


-185 


1858 -138 


1P0 


-251 


1291 


- 21 




100 


-252 


220 


-236 


340 


-232 


460 


- 58 


5B0 


-143 


'00 


-201 


520 


- 46 


940 


- 48 


1868 -142 


1180 


- B2 


1200 


-115 




118 


-112 


23Í 


- 94 


350 


-22B 


470 


- 25 


5«0 


- 58 


710 


-106 


838 


-135 958 


- 21 


1870 - 5B 


1190 - 54 


1310 


- 58 


TOTAL: 


120 


-196 


240 


- 84 










600 - 66 




728 - 88 


848 -168 


«60 


-142 


1,80-12, 


1200 


-142 


1328 


- 21 


15912 



1Í4» IFT=1THENT=2£LSET=1 
1P5ÍI ONTGOSUF»80,1010 
MU FETURN 

ll'i "Lanzaiiento del liiil" 
t»6» B¥=H Y- 1 : 1 FBY< 1 12THEN 1 1 40 

1090 i fcx >nxTHEHnx<nxH 

ttH IFCX'.ttXTHENNX=NX-4 

111» FUTSPRITE3. (HX , HY) , 4, 3: PUTSPR1TE4 

, (NX,MV) , 1 1 , 4 

1121 P.ETURN 

113» ' 'Explosión dfl lisil" 

1141 PUTSPRITE3, (HX-4, EY) .9, 1 :PUTSPRIT 

E4. <«X-4,EY) ,11,2 

1151 IFEYM12THEW0SUB118»! IfltKCMiA 
KBnx>CX-tTHENI22* 

1 160 EY=EY»8¡¡FEYM?0THENNV=190:EY=112 
117» 60701128 

118» SOI», 0: S0UND1 . 5: 30UND2, 0:SOUND3 

.13: 50UND4 . 255: S0UND5, 1 S: S0UND6. 30i SOU 

ND7,0:SQUND8,14:SOUND9,;4:SOUND10,14:S 

3UND 1 1 , f : S0UNDI2 , 5 : SDUND1 J, í : FQRI= 1 T03 

0:NE>T:SOUNO!2,54:SOUND13,0 

UN FDRI=BTD2#Í : NEXT : SQUND0, 1 50: SOUMO 

1,1: S0UND2, 15»: S0UND3. 2: S0UND4. í: SOUND 

5 . S i SOUNfffi .15! iOUNO?. 9* l f OUHOt . 61 iguMD 

9,6:SOUND10,6 

1211 RETURN 

121» "Ca«i«n destruido' ' 

122» SOUND», 0 : SOUHD 1 , 5 : S0UND2 . *: 50UND3 

, 13: S0UND4, 255: S0UND5, !5:S0UND4, 3»: SOU 

KD7,liS0UKU,líi SOUND 1 !, léiSWMDlf.liiS 

OUND11,»:SOUND12,5:SOUND13.0:FOP!=1TO3 

0: NEXT : SQUND12. 56: SDUHD 13, 0 

123» C0-8 : C 1 - 1 1 : FORM- 1 TD25 : PUTSPRITE l , 

ICX,?M f C#,UrtlTSrttTí2,tCl,?M,Cl,2 

124» FORJ=jTO10«:NEXT 

¡25» IFN/2=1NT(N/2)THENC0=9:C1=IIELSEC 

»»8lCl>ll 

124» NEXT 

127» PUT3PRITE1,!0,0I,,15:PUTSFRITE2,Í 

».»),, 15:CI«(15*DI8 

128» »l«VI-3!L0CATEVI I JiP(tlNT8rACE«(3) 

:IFVI=0THENI35» 

129» FaP.!=0TO2í:LOCATE0,5:PRINTCHR«<27 
) ♦ ' l- : LGCATE0, 5 : PR I NT A$ : s «EX T 

13»» 5OTQ7T0 

1310 "NisiSn cmpliía" 

132» FOR I=0TO20 ¡LOCATE» , 5: FFTNTCHP» i 27 

í+"L-iLOCATE0,5:PRINTfl*;:»EXT 

133» L0CATE8,3:PRINT"«:SION CUMPLIDA" 

1340 PLAY'N25505T255L32GGA66AFGGGGA36A 

FGGGSEDGAAAFEÜCBAEF3R8GFED05C04BA" 

1350 L0CATE7,4:PRINT'0TRA PARTIDA 'S\N 

>" 

1360 A$=INPUT» i 1 ) : IFA*=-S"ORfl*=-s"THEN 
480ELSEIFA$='N 1 ORA«=VTHENSCREEN0:KEY 
ON:N!DTH38:COL0R 13,4,4:END 
137» GOTO1360 



Programa«Por David Amado Olbai 



REPARTO 
MUSICAL 



Cinco son las piezas que com- 
ponen este reparto musical, es- 
cogidas entre el amplio reperto- 
rio de Bach y Schuman. Solista 
de este concierto, tu MSX. Un 
a dedicado a los aman- 
tes de la música clásica. 




1 fiEHtttmmniutmiiiiKt.tiiii 

2 REDI REPARTO MUSICAL 

3 REÑI REALIZADO 

4 REÑI POR 

5 REÑI David Aiadd Olba 
4 PENI PARA 

7 REN» MSX CLUB 

8 REittttiititintttmittsttttmMt! 

94 REM N21 NUSETTE 

95 CLS 

H CCL0R4.1 
97 G0SUB1»»» 
'3 FDSI«1T02 
99 PLAY'N4000Sll" 

III A«='T9»04L4AL146F*EDL4AL16GFtED05F 
*6L8ASF»EAF*D04L4AL166F*EBL4AL16GF*ED0 
5F-GL8A6F+EAL4D" 

120 B»=-T90O3L8DO4DO3DO4DO3DO4DO3DO4DL 

16F.GL8AGF.EAF.D03D04D03D04D03D04D03DO 

4DL16F+6L8AGF+EAL4D" 

13» PLAYAS, B$ 

140 NEXT! 

145 F0RA=1T02 

146 PLAY'MMSl" 

150 A$='T9«06LI6C»DL8EL14ML8EAEL4EL8 



AEAEL14DC*05BALBBE04ED*05E06DOC*AG*EO* 
05E06DDC*AG*" 

155 B«="T9»L803A04A03A04A03A04A03A04AO 
3A04A03A04AC3A04A03E04E03E04E03E04EC3E 
04E03ED4E03E04E03E04E03E04E03E04E" 
160 PLAVAi,BI 

170 C«="T90O6L16EDtCtD*ED*C*D*L8EO5GtA 

06DL16C»DL8E05ADL16C*DL8E04L4A' 

160 E«='T90O3L8EO4EO3£O4EO3ED4EC*DL4EO 

3L8A04DL16C*DLBE03L4A' 

190 PLAYC«,EI 

191 PLAVH6M0S11" 

2»0 F«="T90L4O4AL16GF*EDL4Q4AL14GF»EDO 
5L16F*GL8AGF*EAF»D06L4AL14GF*EDL40tALl 
6GF»ED05L16F»618A6F*EAL4D" 

210 G«=-T9»L803D04D03CD4D( 
16F+GLBA6F+EAF+1 
4DLI6F+GL8AGF+EAL4D 
22» PLAYF»,6« 
230 NEXTA 
24» SOTO1130 

211 REN N22 MINUE 

242 PLAY-N500510" 

243 FORB=IT02 



26 



25Í Jt="T90O5LBGBO6DGO5AO6F*L4GO5G6LBG 
B06D605A06F+L4G056606EEL8EGL4DDL8DGL4C 
L8ÍC05B06C05L2A.LBGB06D605A06F+L4G05G6 
L86B06DG05A06F*L4E056606EL8DC05BA06L4D 
L8C05BAGAB06CL405DF+L2G.' 

260 K»="T9BQ4L2GL4Da3LB6B04D6I)03BL2B04 
L4DL803GB04DGD03BL404CGC03B04603BA04F* 
GLB0EF*DEF*L2GL4D03L8G604DGD0JBL2G04L4 
DQ3LBGB04D6Da3E04L4CEGQ3B04DGCCDGD03B" 

261 PLAY Jt,Kf 
279 NEXTB 

2B0 FORC=1T02 

290 L«='T90L8O56ABAGF*L4GEEO6L8GF*EGF» 
EL4F*05BB06L86F*E6F*EL4F+05B06EL8F»GAO 
5L4B06D+EL8D+EL4F+" 

300 I1«="T90L4O4EIHO3BO4EO3BDO4E6BO3LBB 
04D+F*BF+DL4EGB03B04AGAB03B04L2E. 1 
310 PLAY Lt,m 

320 N«='T90L4O6GLBGF»EDL4EL8EDCO5BO6L4 
CL8C05BAGL4F+L8EF+L4DADDBDD06CL8DC05BO 
6CL205A.L86B06DG05A06F*L4G056GLB6B060G 
0¡A06F*L4G056606ELBDC05BA06L40L8C05BA6 
AB06C05L4DF*L2G." 

330 O«="T90L4O3BO4D6CDEO3ABO4CBO3ACO4L 

flF+ÜF+DF+DGDGDGDL4F+DGL3DEF*-DEF*-L2GL4D 

LB6B04DGD03BL2604L4B03LBG804D6D03B04L4 

CEG03B04D6L2CL4D6D036" 

340 PLAYNt.O» 

350 NEXTC 

351 GOT01 130 

360 PEÍ! N25 POBRE HUERFANO 
400 PLAVN900S14- 

410 P«= , T60L16O5ABO6L8C35BAL16ABO6L8Cr 
EL16E.L32FL46F05B.L16ABL806C05BAL16ABL 
806CBEL16E.L3:FL4GF05L8B.L1í06C05B - . 

411 O«="T60L8RBO5EDCRBEGGR8L4O6CL8O3B. 
L16AL4G*.R8L805E0CRBEGGR8L406CL805B.Li 
6ALBE.L16DL8C" 

412 R»= , T60L8O4AEAR3AGO5CRSL4CL8D.R16L 
4E.04R8L8AEAR8A6O5CR8L4CLBD.R16R9.R16O 

420 PLAYP»,B«,R» 

430 S«= , T40L16O56tAL8BO6CDFECO5BL16G+A 
L8B06CDFL4056.L16AB06L8C05BAL16AB04L8C 
DEL16EFL4GF05B.L16AB06L8C05BAL16AB06LB 
CDEU6EF" 

440 T«="T60L16O4EF*L3G*ABO5EECO4BLI6EF 
+LB6+ABO5LBEL4EL16EDC04BLBA05DCR8E66R8 
L406C05LBB.L16AL4G*.R805L8E¡)CReESGR8" 

441 U*= , T6ÍR16R16RBR8R805L8DC04AG*R16R 
16P8RBP8L1605CDR4P16R16P16R16R8L804EAP 
8AG05CRBL405CDE.R804LBAEARBA605CR8" 
450 PLAY S»,T«,U« 

460 V«= , T60L4O6GFL8O5B.Q6L16CO5LBAL16G 
*AL8B06CDFEC05BL16G*ALSBO6CÍF05L4B.L16 
AB06L8C05BAI 1 6ABLB06CDEL 1 6EFL46F05B. Ll 
6ABO6L8C05BAL16AB06L8C0EL16EFL4GFL8O5B 
.06U6C05L8A" 

470 H«="T60L4O6CO5LBB.L16AL8E.L16DL8CL 
1604EF+L8E+AB05EEC04BL16EF+L8G*ABL1605 



CDL4EL16EDC04BLBA05ECR8E66R8L406C05L8B 
.L16AL4G*.R8LB05ECCR8EGGR8L406C05LBB.L 
I6AL8E.L16DL8C* 

471 Xi= , T60L4O4CDR4L8O4AR16R16R8RBR8O5 

LBDC04A6*RI6R16R8PBR805L16CIIR4Rl6fil6Pl 

6R16R8LB04EAR8A&05CR8L4CDE.RB04LBAEARB 

AG05CR8L405CDR404LBA" 

488 PLAYVS, **,!(« 

4B1 6OTO1130 

482 REÍ N84 SICILIANA 

490 FtíVIBUSH" 

491 FORK=!T02 

500 Y«= , T90O6L8EO5L4G*L3G+S*ABL46L3AL4 
A06L8EL405S+L8E+G+ABL4A.AL8GL4F+LBF+F+ 
A+06C+05L4BL36L4E'L8AGF*tL4BLB04BL405E. 
E" 

510 Z«="T90O5L4OL8DL4D.L4EL9EL4E.L4DL8 
DL4D.L4E.E05L8DL4CHflt*L4C». D*L8D*L4D» 
04L8B05L4E04L8GL4B03L8804L4E. E" 

511 AA«*'T9J04L46L8BL48. 05L4CLBCLBC.04 
L4BL8BL4B.05C.CL804BL4A*L8A*L4A+.ELB8L 
4PPBR4R8R4R8R4R4' 

520 PLAYY$,Z«,AA« 
538 NcXTX 
535 F0FS=1T02 

540 ÍB*= , T90O6L8GO5L4A'L8AABO4C*C5L4BL 
8BL4B06L8GL405A*L6AAB06C'05L4B.BL6AL46 
L8GGF*EL406CL8CL4CL8C05BA60áL4!0!L8¡)L4 
6.6' 

550 AC i ='T90P8L4O5ELBEL4E.L4F*L8F*L4F. 
.L4EL8EL4E,F*.FL8E'L4EL8EEF:8RB05L4CL8CL 
4CLSC04L8BA6L4050L804DL4G.G" 

551 AO*="T90R8L4O5C*L8C*Lít».L4D»LBÍ*L 
4D*.L4C*L8C»L4C».L4B*.0'L8D'R4PBP8P8FB 
L404ALBAL4AR8LSBAER4R8P4R8P4" 

560 PLAY ABt.ACt.AD» 
570 NEXTS 

580 AE«= , T9805LiGL8G»L4G«06L8E05L4G»LB 
6+G*ABL4AL8AL4A06L8EL405E*LBG'E*AEL4A. 
ALflGL4F»L8F*F»A»06C , L405BLBBL48LBAEF»E 
L4BLB04BL40IE.ER8" 

590 AH=-T90O4L4GL8BL4BP8O5L4DL3DL4O.E 
L8EL4E,L4DL8DL4D,E.EL805BL4C*LBC»L4C*. 
DtL8D»L4D»L804BL405E04L6GL4BL803BL404E 
.ER8" 

591 AO»="T9804R4L8EL4ER804L4BL8BL4B.05 
CLBCL4C. 04BL8BL4B. 05L4C. CL804BL4A+L8A* 
L4A*. BL8BL4B. R6R4RSR4R8P4R8R4" 

600 PLAYAE>,AII,A0l 

610 AU«= , T98L1605A06CECFDECFBECD05BL3A 
L16A06CECFDECFDECD05BLBAL16AB06C05A06E 
C058G06EC05BGFtBL8EL16AB06C05A06EC05BG 
06EC05B6F*EL8ELl6AO6CECFDECF0ECD05BL8A 
L16A03CECFDECFDEC005BL8A" 

620 BAM"T'0O5L4EL8FEFEDCL4EL8FEFEDCL4 
ELBE04B05E04BBEL405ELBE04B05E04BBEL405 
EL8FEFEDCL4EL8FEFEDC - 

621 BBt="T98L404AL8AADAAEAL4AL8AAAAEAL 
4ALBF»6F*6R8R8L4AL8F»GL8F«SR8R8L4AL8AA 
AAEAL4AL8AAL8AAEA" 



630 PLAYAUt.BAt.BBt 

640 BC«="T90O5L4EO6LBEL4O55»L8G*GtABL4 
AL8AL4A06L8EL4056*L8G*6+ABL4A.AL86L4F+ 
LBF+F+A+06C+05L4BL8BL4BL8AGF+EL4B04L8B 
05L4E.ER8" 

690 BE«= , T90O4L4BR8O5L4DLBDL4D.EL8EL4E 
.L4DL8DL4D.E.ELBO50L4C*L8C*L4C«.D*L8D* 
L4D+LB04BL405E04L8GL4BL803BL404E.ERB" 

691 BD(-"T90L4O4AL6AADAAEAL4AL8AAAAEAL 
4AL8F+GF i GR8R8L4AL8F*6L8F*GR9R8L4ALSAA 
AAEAL4AL8AAL8AAEA" 

700 PLAYBC«,BEJ,BD« 

701 GOT01131 

702 REM N!3 POLONESA 

703 PLAY-N500S10' 

704 F0RYMTO2 
710 FOR X=1T02 

720 CA«= , T90O6L8FL!6FGL8AL16GAB-AGFL8G 
L16GA6FE0L6EC05L4A06DCLE05B-06i:6CDC05 
B-A6L3AFAL16B-06CL8BL16DEL4C05l3BL160í 
CDC058-A6L8AF06FL16FELBOC05B-AL16E6-AG 
L2F" 

730 CB«= - T9ív?04LBAB-L405CCC04B05ta4L: 
60E-DE03L8B-04B-A03AG04FECL16FCC38-04C 
L4FTFGL1ÍFEFGL8AFB-05CDC46-05C04CFLÍ6 
C03AL4F* 

731 CD*="T'0V7C4L4<7FEDCFlíR!jí: ; ¡:::SS 
RBKeRBRBRBP3R40IFB-AO4DEP*R4E;P4F4F'4" 
748 RUYCA«,C8»,CM 

750 NEXT X 

751 FORE=1T02 

770 CE«= - T o 0O6L8AL!6A6L8AL:iEO5AB-ÍGFL 
8GL16GFL8GL16FGA5FEISAL16AGL8FEDCL1605 
B-06CD05B-G6L4C05B-L8A06CC05L16E-OtCLi 
D05L86E-B-L16AE-06L4CLBFL16FEL8DC05E-A 
L16GB-AGL2F" 

771 CF»«"TM05V71.4CKCCCCC04«L8603S04C 
03CDEFC4L16FGL8AFB-03E-04C5C03B-AC-AFB- 
Q4CD0'B-04Ca3CFL16fl04CL4F" 

772 CG«="T90V10O4L4FFFEGEFAFF4RBF3PER8 
R4R2P2P4R4R2R4R4F4" 

780 PLAYCEt,CF«,C6« 
790 NEXTE 

800 CKÍ= - T90O6L6FLlóFSL8ALlsGAB-AGFL3C- 
L166AGFEDLBEC05L4AOéDC03L8B-06LÍ6CDC05 
B-AGLOArAL16B-0¿CL80L16DEL4C05LBB-0¿Ll 
6CDC05B-AGL8AFQ6FL 1 6FEL8DC05Í-AL ¡ 6GB-A 
6L4FL4F" 

810 CIÍ= , T90V7O4L8FAO5CO4AFO5Ca4EO5C!4 
DBL8O5LitC04B-A6FEDC03B-04FEF0:A04FEFL 
803G04FCE03L16F04CDEL8FL16GALEB-FAFGFE 
CL16FGAB-L8AF03B-04CB03E-O4C0:CFL16fi04 
CL4F- 

820 PLAYCHt.CH 
830 NEXT Y 
840 GOTO! 130 

1000 PRINT'.i.«.».tt««................ 



1010 PRINT"í«i»«»«»"«»«REPAFTO#mm 
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Test de listados i 



1 - 8 


99 


-265 


191 


-285 


288 -17B 


412 


-223 


491 


-199 


598 -251 


7Í3 


-155 


798 -2»8 


1868 -227 


118» - 89 


2 - 1 


IM 


- 42 


288 


-15? 


29» - 33 


(28 


-128 


588 


- 26 


591 -233 


7»4 


-28» 


8»» -153 


1878 -173 


119» -167 


3 - » 


121 


-151 


21» 


-156 


3»» -119 


438 


- 75 


518 


-229 


688 - 37 


718 


-199 


818 - 75 


1888 -199 


128» -112 


4 - » 


131 


-184 


221 


-194 


318 -286 


448 


-232 


511 


-134 


611 -251 


728 


-157 


828 - 76 


189» -173 


121» - 74 


5 - » 


141 


-2M 


238 


-196 


32» -146 


441 


-166 


528 


-186 


628 -139 


73» 


- 18 


83» -228 


118» - 74 


1228 -131 


6 - t 


145 


-176 


2«8 


- 5 


338 - 43 


45? 


-129 


538 


-219 


621 - 53 


731 


-159 


848 - 5 


111» -173 


123» -163 


7 - 1 


14i 


-187 


241 


- 1 


348 -211 


468 


-225 


535 


-W 


63» - 34 


748 


- 21 


188» - 5 


1128 - 75 


1248 -158 


8 - » 


158 


- 99 


242 


-155 


358 -198 


471 


- 47 


54í 


- 29 


64» - 25 


758 


-219 


1818 -174 


1121 -173 


1258 -119 


n - i 

95 -15? 


155 


-146 


243 


-177 


351 - 5 


471 


-214 


558 


-121 


69» -187 


751 


-188 


1811 - 5 


1122 - 5 


126» - 18 


IM 


-184 


258 


-ai 


366 - í 


4E8 


-13B 


551 


- 19 


691 - 55 


77» 


- 87 


182» -173 


1138 - 17 


1278 - 39 


94 - 16 


17» 


- 35 


261 


-128 


488 -163 


481 




568 


- 17 


78» - 23 


771 


- 46 


183» -173 


1131 - 84 




97 -134 


180 


-128 


261 


-282 


418 - 14 


432 


- 1 


5'8 


-214 


7»! - 6 


772 


- 78 


1Í4Í -139 


1168 - 68 


TOTAL: 


98 -184 


m 


-189 


T'.i 




4 = 8 


-155 


558 




788 


¿i 


1»5« -173 


117Í - 23 


J5824J 



DE MAILING 



¡NOS APLICAMOS A SER UTILES! 

1 TRAVES DE MSX CLUB DE MWUNG PUEDES ADQUIRIR 



BASIC TUTOR IDEALOCIC 



I ADAPTADORES TARJETAS] 
I INTELIGENTES 
BEE CARO Y SOFTCARD | 

¡¡ • -: ^■,;;vyUh- - : - - ' 




Deja el manual de lado. Inserta este breviario de 
BASIC en cartucho y olvidate. No ocupa memoria. 

PVP 3.500 pts. 



ENVIA HOY MISMO ESTE CUPON — 



Nombre y apellidos 

Dirección 

Población 




No te quedes 
al margen 
y disfruta 
de las tarjetas 
inteligentes. 
lo último 
en soft. 



CP 



Prov. 



Tel 



□ Adaptador Softcard Ptas. 2.850- 

□ Shark Hunter Ptas. 5.200- 

□ Le Mans 2 Ptas. 5.200,- 

Gastos de envió por cada producto 100,- pts. Remito talón bancario de pts. a la orden de Manhattan 

Transfer, S.A. Enviar a MSX CLUB de MAILING, Roca i Batlle 10-12 bajos - 08023 Barcelona. 



□ Tutor Basic Ptas. 3.500- 

□ SweetAcorn Ptas. 5.200,- 

□ Barn Stormer Ptas. 5.200, 



□ Adaptador BeeCard Ptas. 2.850,- 

□ Backgammon Ptas. 5.200- 

□ Chock'n Pop Ptas. 5.200- 



MSX por dentro ! 



Por Ronald Van Gink 



LA VRAM 
EN SCREEN 1 



El modo de pantalla SCREEN 1 permi- 
te el manejo de SPRITES y la utilización 
de gráficos (mediante la redefinición de 
caracteres). En este artículo desvelamos 
todos los secretos de este modo de panta- 
lla, usos, cualidades y defectos de la 
VRAM en SCREEN 1. Adenúiincluimos 
todas las tablas de este modo depantalla. 



Direc. Carac. 



Direc. Carac. 



Direc. Carac. 



0-7=CHR$(0) 

24-31=CHR$(3) 

48-55=CHR$(6) 

72-79=CHR$(9) 

96-103=CHR$(12) 

120-127=CHR$(15) 

144-151=CHR$(18) 

168-175=CHR$(21) 

192-199=CHR$(24) 

216-223=CHR$(27) 

240-247 =CHR$(30) 

264-271=CHR$(33) 

288-295=CHR$(36) 

312-319=CHR$(39) 

336-343 =CHR$(42) 

360-367=CHR$(45) 

384-391=CHR$(48) 

408-415=CHR$(51) 

432-439=CHR$(54) 

456-463 =CHR$(57) 

480-487=CHR$(60) 

504-511=CHR$(63) 

528-535=CHR$(66) 

552-559=CHR$(69) 

576-583=CHR$(72) 

600-607=CHR$(75) 

624-631=CHR$(78) 

648-655=CHR$(81) 

672-679=CHR$(84) 

696-703=CHR$(87) 

720-727=CHR$(90) 

744-751=CHR$(93) 

768-775=CHR$(96) 

792-799=CHR$(99) 

816-823=CHR$(102) 

840-847=CHR$(105) 

864-871=CHR$(108) 

888-895=CMR$(lll) 

912-919=CHR$(114) 

936-943=CHR$(117) 

960-967=CHR$(120) 

984-991=CHR$(123) 

1008-1015=CHR$(126) 

1032-1039=CHR$(129) 

1056-1063=CHR$(132) 

1080-1087=CHR$(135) 

1104-1111=CHR$(138) 

1128-1135=CHR$(141) 

1152-1159=CHR$(144) 

1176-1183=CHR$(147) 



8-15=CHR$(l) 

32-39=CHR$(4) 

56-63 =CHR$(7) 

80-87 =CHR$( 10) 

104-1 11=CHR$(13) 

128-135=CHR$(16) 

152-159=CHR$(19) 

176-183=CHR$(22) 

200-207=CHR$(25) 

224-23 1=CHR$(28) 

248-255=CHR$(31) 

272-279=CHR$(34) 

296-303=CHR$(37) 

320-327=CHR$(40) 

344-351=CHR$(43) 

368-375 =CHR${46) 

392-399=CHR$(49) 

416-423=CHR$(52) 

440-447=CHR$(55) 

464-47 1=CHR$(58) 

488-495=CHR$(61) 

512-519=CHR$(64) 

536-543 =CHR$(67) 

560-567=CHR$(70) 

584-591 =CHR$(73) 

608-615=CHR$(76) 

632-639=CHR$(79) 

656-663=CHR$(82) 

680-687=CHR$(85) 

704-711=CHR$(88) 

728-735=CHR$(91) 

752 759=CHR$(94) 

776-783=CHR$(97) 

800-807=CHR$(100) 

824-831=CHR$(103) 

848-855 =CHR$( 106) 

872-879=CHR$(109) 

896-903=CHR$(112) 

920-927=CHR$(115) 

944-951=CHR$(118) 

968-975=CHR$(121) 

992-999=CHR$(124) 

1016-1023=CHR$(127) 

1040-1047=CHR$(130) 

1064- 107 1=CHR$( 133) 

1088-1095=CHR$(136) 

1112-1119=CHR$(139) 

1136-1143=CHR$(142) 

1160-1167=CHR$(145) 

1184-1191=CHR$(148) 



16-23=CHR$(2) 
40-47=CHR$(5) 
64-71=CHR$(8) 
88-95=CHR$(ll) 
112-H9=CHR$(14) 
136-143=CHR$(17) 
160-167=CHR$(20) 
184-191=CHR$i;23) 
208-215=CHR$(26) 
232-239=CHR$(29) 
256-263=CHR$(32) 
280-287=CHR$(35) 
304-311=CHR$(38) 
'328-335=CHR$(41) 
352-359=CHR$(44) 
376-383=CHR$(47) 
400-407=CHR$(50) 
424-43 1=CHR$(53) 
448-455=CHR$(56) 
472-479=CHR$(59) 
496-503 =CHR$(62) 
520-527=CHR$(65) 
544-55 1=CHR$(68) 
568-575=CHR$(71) 
592-599=CHR$(74) 
616-623=CHR$(77) 
640-647=CHR$(80) 
664-671=CHR$(83) 
688-695=CHR$(86) 
712-719=CHR$(89) 
736-743=CHR$(?2) 
760-767=CHR$(95) 
784-79 1=CHR$(98) 
808-815=CHR$(101) 
832-839=CHR$(104) 
856-863=CHR$(107) 
880-887=CHR$(110) 
904-911=CHR$(113) 
928-935 =CHR$( 116) 
952-959=CHR$(119) 
976-983=CHR$(122) 
1000-1007=CHR$(125) 
1024-1031 =CHR$( 128) 
1048-1055 =CHR$(131) 
1072-1079 =CHR$( 134) 
1096-1103 =CHR$(137) 
1120-1127 =CHR$(140) 
1144-1151 =CHR$(143) 
1168-1175 =CHR$(146) 
1192-1199 =CHR$(149) 



La VRAM es la memoria que con- 
trola todas las operaciones de 
pantalla, es decir, todos los grá- 
ficos, caracteres y SPRITES se pueden 
controlar mediante esta memoria. Para 
este objetivo existen dos instrucciones 
que nos permiten interrelacionarnos 
con la VRAM: 

1 - VPOKE n,x: Introduce en la 
zona de memoria n (entre 0 y 16383) un 
valor x (entre 0 y 255). 

2 - x = VPEEK (n): Lee el valor x 
contenido en una zona de memoria n. 

Mediante estas dos simples instruc- 
ciones se pueden imprimir gráficos, 
mover sprites, redefinir caracteres, es- 
cribirlos en pantalla, etc. 

En este artículo nos limitaremos a 
explicar el funcionamiento de la 
VRAM en SCREEN 1, ya que en este 
modo de pantalla es donde más utili- 
dad tiene (casi todos los juegos comer- 
ciales están realizados en SCREEN 1). 




LA VRAM EN SCREEN 1 

Inicio de la tabla de caracteres: 0. 

Final de la tabla de caracteres: 2047. 

Inicio de la zona de pantalla: 6144. 

Final de la zona de pantalla: 6911. 

Inicio de la zona de control de SPRI- 
TES: 6912. 

Final de la zona de control de SPRI- 
TES: 7039. 

Inicio de la tabla de colores de carac- 
teres: 8192. 

Final de la tabla de colores de carac- 
teres: 8223. 

Inicio de la tabla de definiciones de 
SPRITES: 14336. 

Final de fertabla de definiciones de 
SPRITESi' 16383. 



1200-1207 
1224-1231 
1248-1255 
1272-1279 
1296-1303 
• -4320-1327 
1344-1351 
1368-1375; 
1392-1399 
14 16- 1423 ■ 
1440- 1447 ■■ 
1464- 147 1: 
1488-1495: 
1512-1519; 
1536-1543: 
1560-1567: 
1584-1591: 
1608-1615: 
1632-1639: 
1656-1663 = 
1680-1687: 
1704-1711 = 
1728-1735 = 
1752-1759= 
1776-1783= 
1800-1807 = 
1824-1831= 
1848-1855: 
1872-1879= 
1896-1903: 
1920-1927: 
1944-1951 = 
1968-1975: 
1992-1999: 
2016-2023: 
2040-2047: 



=CHR$(150) 
=CHR$(153) 
=CHR$(156) 
=CHR$(159) 
=CHR$(162) 
=CHR$(165) 
=CHR$(168) 
=CHR$(171) 
=CHR$(174) 
=CHR$(177) 
=CHR$(180) 
=CHR$(183) 
=CHR$(186) 
=CHR$(189) 
=CHR$(192) 
=CHR$(195) 
=CHR$(198) 
= CHR$(201) 
=CHR$(204) 
=CHR$(207) 
=CHR$(210) 
=CHR$(213) 
=CHR$(216) 
=CHR$(219) 
=CHR$(222) 
=CHR$(225) 
=CHR$(228) 
=CHR$(231) 
=CHR$(234) 
=CHR$(237) 
=CHR$(240) 
=CHR$(243) 
=CHR$(246) 
=CHR$(249) 
=CHR$(252) 
=CHR$(255) 



1208-1215 = 
1232-1239= 
1256-1263 = 
1280-1287= 
1304-1311= 
1328-1335= 
1352-1359= 
1376-1383= 
1400-1407= 
1424-1431= 
1448-1455 = 
1472-1479= 
1496-1503 = 
1520-1527 = 
1544-1551 = 
1568-1575 = 
1592-1599= 
1616-1623 = 
1640-1647= 
1664-1671 = 
1688-1695 = 
1712-1719= 
1736-1743= 
1760-1767 = 
1784-1791= 
1808-1815= 
1832-1839= 
1856-1863= 
1880-1887 = 
1904-1911= 
1928-1935= 
1952-1959= 
1976-1983= 
2000-2007 = 
2024-2031 = 



=CHR$(151) 
=CHR$(154) 
=CHR$(157) 
=CHR$(160) 
=CHR$(163) 
=CHR$(166) 
=CHR$(169) 
=CHR$(172) 
=CHR$(175) 
=CHR$(178) 
=CHR$(181) 
=CHR$(184) 
=CHR$(187) 
:CHR$(190) 
:CHR$(193) 
CHR$(196) 
:CHR$(199) 
CHR$(202) 
:CHR$(205) 
CHR$(208) 
CHR$(211) 
CHR$(214) 
CHR$(217) 
CHR$(220) 
CHR$(223) 
CHR$(226) 
CHR$(229) 
=CHR$(232) 
=CHR$(235) 
=CHR$(238) 
=CHR$(241) 
:CHR$(244) 
:CHR$(247) 
:CHR$(250) 
CHR$(253) 



1216 
1240 
1264 
1288 
1312 
1336 
1360 
1384 
1408 
1432 
1456 
1480 
1504 
1528 
1552 
1576 
1600 
1624 
1648 
1672 
1696 
1720 
1744 
1768 
1792 
1816 
1840 
1864 
1888 
1912 
1936 
1960 
1984 
2008 
2032 



1247 
1271 
1295= 
1319 
1 543: 
1367: 

1391: 

1415= 

1439: 

1463 
1487: 
1511 = 
1535 = 
1559= 

15X3: 
1607: 
1631 = 

1655= 

1679 = 
1703 = 
1727 = 
1751 = 
1775 = 
1799 = 
1X23 = 
1847 = 

1871 = 

1895= 
1919= 
1943 = 
1967 = 
1991 = 
2015 = 
2039= 



= CHR$(152 
=CHR$(155 
=CHR$(158 
=CHR$(161 
=CHR$(164 
= CHR$(167 
=CHR$(170 
=CHR$(173 
=CHR$(176 
= CHR$(179 
=CHR$(182 
=CHR$(185 
=CHR$(188 
=CHR$(191 
=CHR$(194 
=CHR$(197 
=CHR$(200 
= CHR$i203 
= CHR$(206 
=CHR$(209 
=CHR$(212 
=CHR$(215 
= CHR$(218 
=CHR$(221 
=CHR$(224 
CHR$(227 
=CHR$(230 
=CHR$(233 
=CHR$(236 
=CHR$(239 
=CHR$(442 
= CHR$(245 
=CHR$(248 
=CHR$(251 
=CHR$(254 



TABLA 2: Códigos de los colores 



Cod. 


Car. 


Fon 


Cod. 


Car. 


Fon. 


Cod. 


Car. 


Fon. 


0 


0 


0 


1 


0 


1 


2 


0 


2 


3 


0 


3 


4 


0 


4 


5 


0 


■ 5 


6 


m 0 


' 6 


7 


0 


7 


8 


0 


8 


9 


0 


9 


10 


0 


10 


11 


0 


11 


12 


0 


12 


13 


0 


13 


14 


0 


14 


15 


0 


15 


16 




0 


17 




1 


18 


1 


2 


19 




3 


20 




4 


21 


1 


5 


22 




6 


23 




7 


24 


1 


8 


25 




9 


26 




10 


27 


i 


11 


28 




12 


29 




13 


30 


1 


14 


31 




15 


32 


2 


0 


33 


2 


1 


34 


2 


2 


35 


2 


3 


36 


2 


4 


37 


2 


5 


38 


2 


6 


39 


2 


7 


40 


2 


8 


41 


2 


9 


42 


2 


10 


43 


2 


11 


44 


2 


12 


45 


2 


13 


46 


2 


14 


47 


2 


15 


48 


3 


0 


49 


3 


1 


50 


3 


2 


51 


3 


3 


52 


3 


4 


53 


3 


5 


54 


3 


6 


55 


3 


7 


56 


3 


8 


57 


3 


9 


58 


3 


10 


59 


3 


11 


60 


3 


12 


61 


3 


13 


62 


3 - 


14 


63 


3 


15 


64 


4 


0 


65 


4 


1 


66 


4 


2 


67 


4 


3 


68 


4 


4 


69 


4 


5 


70 


4 


6 


71 


4 


7 


72 


4 


8 


73 


4 


9 


74 


4 


10 


75 


4 


11 


76 


4 


12 


77 


4 


13 


78 


4 


14 


79 


4 


15 


80 


5 


0 



En la tabla de caracteres se encuen- 
tran las definiciones de todos los carac- 
teres utilizados en SCREEN 1. Como 
se puede interaccionar sobre esta me- 
moria, se pueden introducir nuevos da- 
tos que modifiquen los diseños de los 
caracteres, un ejemplo sería: 

SCREEN 1 (a partir de ahora, se da 
por supuesto que estamos en screen 1 ) 
VPOKE 520,255. 

Al pulsar la tecla A, ésta saldrá con 
una línea en la parte superior. 

A cada carácter le corresponden 8 
números que lo definen (como un 
SPRITE de 8x8), para redefinir un ca- 
rácter sólo hay que buscar en qué di- 
rección comienza (buscando en la tabla 
1) e introducir mediante VPOKE los 8 
datos que lo redefinirán, un ejemplo de 
como redefinir la A sería: 

10 SCREEN 1 

20 FOR 1=520 T0 527:READQ: 

VPOKE I,Q: NEXT 
30 DATA 66,129,153,219,189,153, 

129,66 

En este caso, la A queda redefinida 
como una nave espacial, lo que de- 
muestra la utilidad que tiene como sus- 
tituto de un SPRITE, ya que no tiene la 
limitación del quinto SPRITE, un úni- 
co defecto es el de que el movimiento 
no se puede realizar punto por punto, 
sino de ocho en ocho. La mayor dificul- 
tad que puede existir en la definición 
de un carácter puede ser la de encon- 
trar la dirección de dicho carácter, sin 
embargo, como ahora se verá, esto es 
muy sencillo: 

1 . El primer paso es el de encontrar 
el código de carácter en decimal, para 
esto existe una función en BASIC que 
nos lo indica: 

PRINT ASCCA") 

65 (nos dice que el código decimal de 
• la A es el 65) 

2. El segundo y último paso es el de 
encontrar la dirección. Para ello se 
puede multiplicar el código del carác- 
ter por 8 (65X8=520), con lo que ob- 
tenemos la dirección, o simplemente, 
buscar en la tabla A un CHR$ (65) , jun- 
to a dicho carácter se encuentran las di- 
recciones de inicio y final de su defini- 
ción. 

Una vez conocida la forma de dise- 
ñar un nuevo carácter, pasamos al si- 
guiente apartado, que es cómo colocar 
un carácter en pantalla. Para ello debe- 
mos tener en cuenta que la dirección de 
inicio de la zona de pantalla es la 6144 
(que corresponde a la esquina superior 
izquierda), y la del final es la 6911 (que 
corresponde a la esquina inferior dere- 



81 


5 


1 


82 


5 


2 


83 


5 


3 


84 


5 


4 


85 


5 


5 


86 


5 


6 


87 


5 


7 


88 


5 


8 


89 


5 


9 


90 


5 


10 


91 


5 


11 


92 


5 


12 


93 


5 


13 


94 


5 


14 


95 


5 


15 


96 


6 


0 


97 


6 


1 


98 


6 


2 


99 


6 


3 


100 


6 -. 


4 


101 


6 


5 


102 


6 


6 


103 


6 


7 


104 


6 


8 


105 


6 


9 


106 


6 


10 


107 


6 


11 


108 


6 


12 


109 


6 


13 


110 


6 


14 


111 


6 


15 


112 


7 


0 


113 


7 


1 


114 


7 


2 


115 


7 


3 


116 


7 - ■ 


4 


117 


7 


5 


118 


7 


6 


119 


7 


7 


120 


7 


8 


121 


7 


9 


122 


7 


10 


123 


7 


11 


124 


7 


12 


125 


7 


13 


126 


7 


14 


127 


7 


15 


128 


8 


0 


129 


8 


1 


130 


8 


2 


131 


8 


3 


132 


8 


4 


133 


8 


5 


134 


8 


6 


135 


8 


7 


136 


8 


8 


137 


8 


9 


138 


8 


10 


139 


8 


11 


140 


8 


12 


141 


8 


13 


142 


8 


14 


143 


8 


15 


144 


9 


0 


145 


9 


1 


146 


9 


2 


147 


9 


3 


148 


9 


4 


149 


9 


5 


150 


9 


6 


151 


9 


7 


152 


9 


8 


153 


9 


9 


154 


9 


10 


155 


9 


11 


156 


9 


12 


157 


9 


13 


158 


9 


14 


159 


9 


15 


160 


10 


0 


161 


10 


1 


162 


10 


2 


163 


10 


3 


164 


10 


4 


165 


10 


5 


166 


10 


6 


167 


10 


7 


168 


10 


8 


169 


10 


9 


170 


10 


10 


171 


10 


11 


172 


10 


12 


173 


10 


13 


174 


10 


14 


175 


10 


15 


176 


11 


0 


177 


11 


1 


178 


11 


2 


179 


11 


3 


180 


11 


4 


181 


11 


5 


182 


11 


6 


183 


11 


7 


184 


11 


8 


185 


11 


9 


186 


11 


10 


187 


11 


11 


188 


11 


12 


189 


11 


13 


190 


11 


14 


191 


11 


15 


192 


12 


0 


193 


12 


1 


194 


12 


2 


195 


12 


3 


196 


12 


4 


197 


12 


5 


198 


12 


6 


199 


12 


7 


200 


12 


8 


201 


12 


9 


202 


12 


10 


203 


12 


11 


204 


12 


12 


205 


12 


13 


206 


12 


14 


207 


12 


15 


208 


13 


0 


209 


13 


1 


210 


13 


2 


211 


13 


3 


212 


13 


4 


213 


13 


5 


214 


13 


6 


215 


13 


7 


216 


13 


8 


217 


13 


9 


218 


13 


10 


219 


13 


11 


220 


13 


12 


221 


13 


13 


222 


13 


14 


223 


13 


15 


224 


14 


0 


225 


14 


1 


226 


14 


2 


227 


14 


3 


228 


14 


4 


229 


14 


5 


230 


14 


6 


231 


14 


7 


232 


14 


8 


233 


14 


9 


234 


14 


10 


235 


14 


11 


236 


14 


12 


237 


14 


13 


238 


14 


14 


239 


14 


15 


240 


15 


0 


241 


15 


1 


242 


15 


2 


243 


15 


3 


244 


15 


4 


245 


15 


5 


246 


15 


6 


247 


15 


7 


248 


15 


8 


249 


15 


9 


250 


15 


10 


251 


15 


11 


252 


15 


12 


253 


15 


13 


254 


15 


14 


255 


15 


15 















Direc. 



Carac. 



Direc. 



Carac. 



8192=CHR$(0)-CHR$(7) 
8194=CHR$(16)-CHR$(23) 
8196=CHR$(32)-CHR$(39) 
8198=CHR$(48)-CHR$(55) 
8200= CHR$(64) -CHR$(7 1) 



8193=CHR$(8)-CHR$(15) 
8195=CHR$(24)-CHR$(31) 
8197=CHR$(40)-CHR$(47) 
8199=CHR$(56)-CHR$(63) 
8201=CHR$(72)-CHR$(79) 



cha), cualquier VPOKE que hagamos 
entre estas dos direcciones, dará como 
resultado el que aparezca un carácter 
en esta zona determinada de la panta- 
lla, la posición de pantalla aumenta ho- 
rizontalmente (es decir, la coordenada 
x) si se incrementa la dirección de uno 
en uno, y aumenta verticalmente (coor- 
denada Y) si se incrementa la dirección 
en 32 unidades, unos ejemplos serían: 

VPOKE 6144,65 (aparece una A en la 
esquina superior izquierda de la panta- 
lla) 

VPOKE 6144+1,66 (nos aparecerá 
una B un lugar a la derecha de la A) 
VPOKE 6144+32,67 (nos aparecerá 
una C un lugar por debajo de la A) 
FOR I =6144 TO 691 1: VPOKE 1,32: 
VPOKE 1+ 1,65:NEXT (nos desplaza- 
rá una A por toda la pantalla) 

La relación entre un LOCATE y un 
VPOKE sería: 

LOCATE X,Y: PRINT"A" = 
VPOKE 6144+X+Y*32,65 

El siguiente paso es saber cómo se 
pueden cambiar los colores de los ca- 
racteres, ya que en SCREEN 1 se per- 
mite definir 2 colores por carácter (el 
del carácter y el del fondo de dicho ca- 
rácter). El único inconveniente es el 
que sólo se pueden definir colores en 
grupos de ocho caracteres, la A y la B 
no se pueden definir con distintos co- 
lores, ya que pertenecen al mismo gru- 
po. 

En la tabla número 3 están las direc- 
ciones de cada grupo. Para saber a qué 
grupo pertenece un carácter se necesita 
tener su código en decimal y sólo resta- 
rá buscarlo en la tabla. 

Para elegir un color, es importante 
consultar la tabla número 2, esta tabla 
se divide en tres columnas, la primera 
indica el código que tendremos que 
poner en el VPOKE, la segunda el co- 
lor del carácter y la tercera el color del 
fondo, sólo tenemos que elegir el color 
que deseamos para el carácter y para el 
fondo, buscarlo en la tabla y anotar el 
código correspondiente, un ejemplo 
sería: 

Queremos colorear la letra B, para 
ello averiguamos su código en decimal 
que es el 66, con este código, consulta- 
mos la tercera tabla, y averiguamos que 
la dirección del grupo donde se en- 
cuentra la B es la 8200. 

El segundo paso' es elegir los colores 
a utilizar, en este caso pondremos el ca- 
rácter de color Fucsia(13) y el fondo 
Negro(l). Consultamos la segunda ta- 
bla y encontramos que es el código 
209, ahora falta poner: 



8202=CHR$(80) 
8204=CHR$(96)- 
8206=CHR$(112) 
8208=CHR$(128) 
8210=CHR$(144) 
8212=CHR$(160) 
8214=CHR$(176) 
8216=CHR$(192) 
8218=CHR$(208) 
8220=CHR$(224) 
8222=CHR$(240) 



CHR$(87) 
CHR$(103) 
CHR$(119) 
CHR$(135) 
CHR$(151) 
CHR$(167) 
CHR$(183) 
-CHR$(199) 
CHR$(215) 
CHR$(231) 
CHR$(247) 



8203=CHR$(88)- 
8205=CHR$(104) 
8207=CHR$(120) 
8209=CHR$(136) 
8211=CHR$(152) 
8213=CHR$(168) 
8215=CHR$(184) 
8217=CHR$(200) 
8219=CHR$(216) 
8221 = CHR$(232) 
8223=CHR$(248) 



CHR$(95) 
-CHR$(111) 
-CHR$(127) 
CHR$(143) 
CHR$(159) 
CHR$(175) 
-CHR$(191) 
CHR$(207) 
CHR$(223) 
CHR$(239) 
CHR$(255) 



Plano 4: 



Plano 8: 



Plano 18: 



TABLA 4: Control de los SPRITES 



69 12- Coordenada Y 

6913- Coordenada X 

6914- Num.SPRITE 

6915- ColorSPRITE 

6920- Coordenada Y 

692 1- Coordenada X 

6922- Num. SPRITE 

6923- Color SPRITE 

6928- Coordenada Y 

6929- Coordenada X 

6930- Num. SPRITE 

6931- Color SPRITE 

6936- Coordenada Y 
693 7- Coordenada X 

6938- Num. SPRITE 

6939- Color SPRITE 

6944- Coordenada Y 

6945- Coordenada X 

6946- Num. SPRITE 

6947- Color SPRITE 

6952- Coordenada Y 

6953- Coordenada X 

6954- Num. SPRITE 

6955- Color SPRITE 

6960- Coordenada Y 

696 1- Coordenada X 

6962- Num. SPRITE 

6963- Color SPRITE 

6968- Coordenada Y 

6969- Coordenada X 

6970- Num. SPRITE 

6971- Color SPRITE 

6976- Coordenada Y 

6977- Coordenada X 

6978- Num. SPRITE 

6979- ColorSPRITE 

6984- Coordenada Y 

6985- Coordenada X 

6986- Num. SPRITE 

6987- Color SPRITE 

6992- Coordenada Y 

6993- Coordenada X 

6994- Num. SPRITE 

6995- Color SPRITE 



Plano 3: 



Plano 17: 



6916- CoordenadaY 

6917- Coordenada X 

6918- Num. SPRITE 

6919- Color SPRITE 

6924- Coordenada Y 

6925- Coordenada X 

6926- Num. SPRITE 

6927- Color SPRITE 

6932- Coordenada Y 

6933- Coordenada X 

6934- Num. SPRITE 

6935- Color SPRITE 

6940- Coordenada Y 

6941- Coordenada X 

6942- Num. SPRITE 

6943- Color SPRITE 

6948- Coordenada Y 

6949- Coordenada X 

6950- Num. SPRITE 

6951- Color SPRITE 

6956- Coordenada Y 

6957- Coordenada X 

6958- Num! SPRITE 

6959- Color SPRITE 

6964- Coordenada Y 

6965- Coordenada X 

6966- Num. SPRITE 

6967- Color SPRITE 

6972- Coordenada Y 

6973- Coordenada X 

6974- Num. SPRITE 

6975- Color SPRITE 

6980- Coordenada Y 

6981- Coordenada X 

6982- Num. SPRITE 

6983- Color SPRITE 

6988- Coordenada Y 

6989- Coordenada X 

6990- Num. SPRITE 

6991- Color SPRITE 

6996- Coordenada Y 

6997- Coordenada X 

6998- Num. SPRITE 

6999- ColorSPRITE . 



VPOKE 8200,209 (con lo que las letras 
de la A a la G se colorean) 

Ahora que va sabemos definir un ca- 
rácter, ponerlo en pantalla y colorear- 
lo, sólo queda saber cómo y para qué 
leerlo de pantalla: 

Mediante la instrucción VPEEK po 
demos leer el dato que hay en una di 
rección de memoria, esta función es ir 
teresante sobre todo para leer los ca 
racteres que hay en pantalla, por ejem 
pío, si tenemos una nave en la pantalla 
(un carácter) y tenemos su coordenada 
en un valor X, podemos leer la posición 
de memoria X+l (VPEEK(X+1)) 
para saber si tiene un carácter delante, 
y qué carácter es. 

Mostramos un ejemplo práctico en 
el listado 1: 

1| til 

20 INPUT'CUANTO TIEMPO :';T 

30 SCREEN 1 ¡COLOR 5,1,1:KEY 0FF:HIDTH 

32 

M ON INTERVflL=Tt50 50SUB 538: INTERVflL 
ON 

58 FOR 1=520 TO 527 'DEFINICION DE LA 
NAVE 

tí READ 0 
76 VPOKE 1,0 
88 NEXT I 

90 ' DEFINICION DE LOS MUROS 
líe FOR !>lMt TO 1687 
110 READ 0 
120 VPOKE 1,0 
130 NEXT I 

140 ' DEFINICION PILDORAS 

15e FOR 1=1200 TO 1207 

160 READ OiVPOKE I,Q¡NEXT I 

170 VPOKE 8200,269 'COLOR CARACTER=FUC 

SI A 113) F0ND0=NESR0(1I 

1B0 VPOKE 8217,33 'COLOR CARACTER=VEP 

DE(2) F0ND0=NE6R0I1) 

190 VPOKE 8210,161 'COLOR CARACTERIZA 

RILLO(ie) F0ND0=NE6RO(l) 

2ee FOR 1=6144 TO 6911 STEP 32 'PONER 

UN BORDE EN LA PANTALLA 

2ie VPOKE I,200¡VPOKE 1*31,200 

220 NEXT I 

230 FOR 1=6144 TO 6175 
240 VPOKE 1,200 
250 VPOKE 1*735,200 
260 NEXT I 

270 X=6444 'COORDENADA DE LA NAVE 
260 VPOKE 1,65 
290 60SUB 440 
300 N=0 

310 D=STICK(6)¡IF D=0 THEN GOTO 310 'T 

ECLAS DEL CURSOR 

320 1F D=l THEN ¥=-32 'SUBE 

330 IF D=3 THEN V=l 'DERECHA 



33 



Plano 30: 



7000- Coordenada Y 

700 1- Coordenada X 

7002- Num.SPRITE 

7003- Color SPRITE 

7008- Coordenada Y 

7009- Coordenada X 

7010- Num. SPRITE 
70 U- Color SPRITE 

7016- Coordenada Y 

7017- Coordenada X 

7018- Num. SPRITE 

70 19- Color SPRITE 

7024- Coordenada Y 

7025- Coordenada X 

7026- Num. SPRITE 

7027- Color SPRITE 

7032- Coordenada Y 

7033- Coordenada X 

7034- Num. SPRITE 

7035- Color SPRITE 



Plano 25: 



Plano 29: 



7004- Coordenada Y 

7005- Coordenada X 

7006- Num. SPRITE 

7007- Color SPRITE 

7012- Coordenada Y 

70 1 3- Coordenada X 

70 14- Num. SPRITE 

70 15- Color SPRITE 

7020- Coordenada Y 

7021- Coordenada X 

7022- Num. SPRITE 

7023- Color SPRITE 

7028- Coordenada Y 

7029- Coordenada X 

7030- Num. SPRITE 

7031- Color SPRITE 

7036- Coordenada Y 
703 7- Coordenada X 

7038- Num. SPRITE 

7039- Color SPRITE 



M IF D=5 THEN Y=32 'BAJA 

58 IF D=7 THEN Y=-l ' IZQUIERDA 

66 IF VPEEK(X+YK>288 THEN l»J«Y 'CGH 

RUEBñ SI HAY UN MURO 

78 IF 1)6911 OR K6I44 THEN J=X-Y 

Bí IF VPEEK(X)=150 THEN BOSUB MI 'CO 

ER PILDORA 

98 VPOKE X, 45s VPOKE l-¥,32 'COLOCA EL 
NUEVO CARACTER Y BORRA EL ANTERIOR 
ti R»INT(RXD(1)I1IH):IF R<76B THEN 4 

I ELSE 43« ' NUEVOS MUROS 

II IF VPEEK(R*6144I<>32 THEN GOTO 311 
2« VPOKE R»6144,288 

SI 60T0 31Í 

41 PLAY"V15T255L64AF' 

SI N=N+1 

68 R=INT(RND(1)I7I4)*6144 
7Í IF VPEEKIRI032 THEN 468 
Bí VPOKE R, 150 
98 RETURN 

88 SCREEN 8:C0L0R 15,4,4 

II PRINT" Has recogido-;N; -pildoras, 

n';T:"segunilD5 ." 

28 DATA 24,68,182,126,68,36,66,129 
38 DATA 255,213,171,213,171,213,171,2 

¡5 

48 DATA 68, 66, 189, 173, 181,189, 66, 66 



Test de listados 



le -159 9e - 5B 171 - 48 258 - 8 

28 - 42 lie - 94 1B8 -145 268 -284 

38 - 58 110 -216 198 - 18 271 -226 

48 -199 128 -141 2ee -214 2S8 -154 

56 - 32 131 -214 211 -125 298 - 84 

68 -216 148 - 58 228 -284 388 - 78 

71 -141 158 - 58 230 -214 318 - 33 

BI -214 168 -164 248 - 18 328 - 45 



338 - 
341 - 



371 
388 -199 



398 -178 
48e - 29 
411 -169 
421 - 37 
438 -286 
448 -238 



458 -142 
468 -222 
478 -183 
488 -233 
490 -142 
588 -189 



5ie - 71 
528 -135 




LOSSPRITES 

En SCREEN 1 también se pueden 



manejar SPRITES, y dos zonas de la 
VRAM se encargan de ello: 

1 . A partir de la dirección 14336 has 
ta la 16383 se almacenan las definicio 
nes de los SPRITES, se pueden alma 
cenar 256 SPRITES de 8 X 8 ó 64 SPRI 
TES de 16x 16. En el primer caso, los 1 
primeros números pertenecerán alpri 
mer SPRITE (0), los 8 segundos afse 
gundo (1)... En el segundo caso, los 32 
primeros números corresponderán 
primer SPRITE (0)... 

2. De la dirección 6912 a la 7039, se 
encuentran todos los datos sobre los 
SPRITES (pos. Y, pos.X, número de 
SPRITE y el color) . En la tabla número 
4 se encuentra toda esta zona más en 
detalle. 

El manejo de SPRITES desde VPO- 
KE es bastante sencillo. Para ello se 
pueden seguir los siguientes pasos: 

a) Colocar la definición del SPRITE 
en la memoria (punto 1). 

b) Crear una subrutina de este tipo: 

10 VPOKE 6912.Y 
20 VPOKE 6913.X 
30 VPOKE 6914.S (número de 

SPRITE) 
40 VPOKE 6915.C (color) 
50 RETURN 

Con ella, bastará un GOSUB 10 
(con los datos actualizados) para que 
ponga el SPRITE en la pantalla, 
número de SPRITE permanece cons 
tante o el color, se pueden omitir las ' 
neas 30 ó 40 (poniéndolas sólo en e 
principio del programa). Esta subruti 
na seria igual que poner: 

PUT SPRITE 0,(X,Y),C,S 

IMPORTANTE: Si se trabaja con 
SPRITES de 16X16, el número de 
SPRITE hay que multiplicarlo por 4. 

Veamos un ejemplo en el listado 2. 

18 SCREEN 1,2. COLOR 6,1,1 

28 DEFINI liFOR 1=14336 TO 14367 

38 READ SiVPOKE I.QlKlT 'DEFINE LOS S 

FRITES 

48 VPOKE 6914,8:VP0KE 6915,6 'NUMERO D 
E SPRITE Y COLOR 

5e VPOKE 691B,8:VP0KE 6919,5 ' NUMERO D 
E SPRITE Y COLOR 

68 FOR 1=1 TO 255 'BUCLE DE MOVIMIENTO 
78 K--I¡Y=B8:S0SUB lie 'FIGURA 1 
Be i=128:Y=I:60SUB 118 'FIGURA 2 
9B NEKT tlEOTQ 6e 

188 VPOKE 6912,Y:VP0KE 6913,«:RETURN 
118 VPOKE 6916,Y:VP0KE 6917,1:RETURN 
128 DATA 1,1,48,78,3.7,7,9,9,6,7,2,12, 

16,8,8 12,114,192,224,224,144,144, 

96,224, 64, 4B,8,e,8 
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YA ESTA EN TU QUIOSCO. Sto, 



UNA REVISTA EXCEPCIONAL. Stop 




Diseñada para servir 



al usuario de un PC. Stop 



EL COMO Y EL POR QUEDE 



UN STANDAR COMUN Stop 




OTRO PRODUCTO MANHA TTAN TRANSFER; S.A. Stop 



A la vanguardia de la prensa útil. Stop 



Monitor al día 




EL "SUPERMICR0S86 
PARA LA IMPRESORA 
LASER CANON LBP-8 

Recientemente, en el hotel Euro- 
building de Madrid, la Revista 
Micros nizo la entrega a los re- 
presentantes de Canon España, S.A., 
de su trofeo anual " Supermicros" , con- 
cedido en su versión 86 a la impresora 
Láser Canon LBP-8, en la categoría de 
"periferia de impresión". 

Con este modelo, Canon se interna 
en el campo de la tecnología Láser apli- 
cada a la informática, en el cual Canon 
es el líder indiscutible. 

Este premio es el reconocimiento de 
la prensa especializada a la constante 
preocupación de Canon por abrir nue- 
vos caminos en el mercado español, 
dando entrada a los modelos más avan- 
zados a nivel mundial. Una vez más... 



THE CHESS CAME 



Ajedrez PHILIPS para MSX-2 

The Chess Game es un excelente 
juego de ajedrez desarrollado 
por Byte Busters para los orde- 
nadores MSX 2, que ofrecerá excelen- 
tes partidas desde la apertura hasta el 
jaque mate. 

El programa permite convertir peo- 
nes en reinas, matar peones al paso y 
realizar enroques. El nivel de dificultad 



del juego se efectúa de un modo muy 
original, puesto que se determina ajus- 
tando el tiempo para cada movimiento. 
Así pues el nivel de dificultad es pro- 
porcional al tiempo permitido al orde- 
nador para ejecutar sus movimientos. 
Cuando el tiempo concedido al orde- 
nador para que éste realice un movi- 
miento haya transcurrido, el ordena- 
dor ejecutará el mejor movimiento en- 
contrado hasta ese instante. 

El juego está completamente contro- 
lado por rnenús. Cadamenú consta de 




The Chess Game, el primer juego de ajedrez es- 
pecialmente diseñado para los MSX-2. 



cuales se accede mediante los movi- 
mientos arriba/abajo de los cursores o 
joystick. También es posible almacenar 
la partida en cassette o disco, puesto 
que el programa se suministra en las 
dos versiones, para poder continuar 
ésta en otro momento desde el punto 
en que se haya abandonado. De todo 
punto recomendable para los aficiona- 
dos al ajedrez. 



TECNICAE-87 



I Semana de la Ingeniería 
Asistida por Ordenador 



Del 4 al 8 de mayo de 1987, va a 
tener lugar en los locales de la 
Escuela Técnica Superior de 
Ingenieros de Caminos, Canales y 
Puertos de Madrid, "TECNICAE- 
87", I Semana de la Ingeniería Asistida 
por Computador, que va a llevarse a 
cabo bajo el patrocinio de los Ministe- 
rios de Educación y Ciencia e Industria 
y Energía, la Comunidad Autónoma de 
Madrid y el Rectorado de la Universi- 
dad Politécnica de Madrid. 

El objetivo de estas Jornadas es lle- 
var al ámbito universitario una visión lo 
más completa posible del estado actual 
y de las posibilidades de utilización que 
ofrecen los sistemas de Diseño por 
Computador en el ámbito tecnológico, 
y al tiempo, servir de punto de encuen- 
tro entre los mundos de la Universidad 
y la Empresa. 

A lo largo de los cinco días de dura- 
ción de "TECNICAE-87" tendrán lu- 
gar, simultáneamente las siguientes ac- 
tividades. 

- Un Curso de Iniciación al Diseño 
Asistido por Computador. 

- Una serie de Jornadas Sectoriales so- 
bre Ingeniería Asistida por Compu- 
tador (CAE). 

- Una Jornada sobre la Función de la 
Universidad en la implantación y 
transmisión de las tecnologías CAE. 

- Una Jornada sobre la Función de las 
Distintas Administraciones en la 
Transmisión de las Tecnologías 
CAE. 

- Asimismo, y simultáneamente con el 
desarrollo de los actos que se acaban 
de señalar, se celebrará una Exposi- 
ción en la que estarán presentes una 
serie de empresas privadas y organis- 
mos públicos interesados en mostrar 
sus realizaciones en material infor- 
mático para ingeniería y arquitectu- 
ra asistidas por Computador. 
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KINETIC CONNECTION 
Y WORLD GOLF 




Dos nuevos títulos SONY para MSX-2 



Poco motivo de queja tienen los usuarios de MSX-2 con 
respecto al software disponible para estos ordenado- 
res, puesto que constantemente están apareciendo 
nuevos títulos para esta segunda generación. 

Recientemente SONY ha lanzado al mercado dos nuevos 
títulos. Se trata de dos programas de juegos: KINETIC 
CONNECTION Y WORLD GOLF, suministrados ambos 
en formato de diskette. 

El primer título, KINETIC CONNECTION, es un exci. 
tante rompecabezas, que ofrece quince pantallas distintas de- 
nominadas "Microkinemas", de cuyo nombre puede dedu 
cirse que están en movimiento permanente. 

El oojeto del juego es formar cada una de las misteriosas fi 
guras atrapando y colocando los objetos móviles en los luga 
res apropiados. Pero esto no es todo. Pueden seleccionarse 
dos moefos distintos de juego: competitivo y no competitivo 
En el caso de que se seleccione el primer modo, al jugador se 
le asigna un determinado número de puntos que constituye 
su capital (FUND) del que se irán restando puntos a lo largo 
del juego en función de determinadas condiciones. 

Además de esto, es posible seleccionar la disposición ini- 
cial deseada o bien jugar empleando una serie ae comandos 
disponibles. 

Él juego ofrece una serie de atractivos adicionales, como 
son el uso de comandos de ayuda o la posibilidad de poder al- 
macenar la pantalla en curso para continuar con el "Microki- 
nema" en cualquier otro momento. Por su peculiar diseño, no 
se trata de un juego meramente individual, sino que pueden 
jugar varias personas. 

El segundo título, WORLD GOLF consiste en una intere- 
sante adaptación del juego GOLF. El programa, aparte de 
contar con unos inmejorables gráficos, aprovechando las po- 
sibilidades de los MSX-2, incorpora un amplio abanico de 
opciones. 

En el juego pueden competir hasta tres jugadores, inten- 
tando completar un recorrido totul de 18 hoyos. El aspecto 
técnico, para los amantes del GOLF real, es muy veraz. Con- 
tamos con 14 palos diferentes, "irons" y "putters" para poder 
realÍ2ar nuestros golpes con la mayor precisión. 

Para completar un golpe hemos de indicar el palo, la direc- 
ción del golpe, la fuerza con que lo damos, y el grado de eleva- 
ción de la bola. 

El campo de golf, está perfectamente realizado, incorpo- 
rando la totalidad de los peligros y alicientes de un campo de 
golf real. Encontraremos por lo tanto * 
roughs y todos aquellos aspectos que 1 
y que lo han convertido en uno de los 
por los programadores de juegos. 



Especial para 



Para qi 
quede al i 



e ningún lector 
argén te propo- 
nueva sección/ 



¡Participa con tu pe- 
queño programa de gráfi- 
cos, sonido, juego o truco! 

BASES 

1. " Podrán participar to- 

dos nuestros lectores, 
cualquiera que sea su 
edad. 

2. " Los programas se re- 

mitirán grabados en 
cassettes debidamente 
protegidas dentro de 
su estuche plástico. 

3. " No se admitirán aque- 

llos programas plagia- 
dos o editados por 
otras publicaciones. 

4. " Las mejoras a los pro- 

gramas se considerarán 
una aportación al mis- 
mo y se publicarán en la 
sección Línea Directa. 



PREMIOS 



,° MSX CLUB pri 
aquellos programas 
publicados con 2.000 
pts. 

• MSX CLUB se reserva 
el derecho de abonar 
los premios en metáli- 
co o su equivalente en 
software, haciéndolos 
efectivos a los 15 dias 
de publicados. 



FALLO Y 
JURADO 

7. " El Departamento de 

Programación actuará 
como jurado y su fallo 
será inapelable. 

8. " Los programas remi- 

tidos no se devolve- 
rán, siendo destruidos 
aquellos que no sean 
seleccionados. 
10." El plazo finalizará el 
30 de junio de 1987. 



MSX Y EL SOFT EDUCATIVO i 



■Por Josep Antoni 



ENSEÑANZA 
ASISTIDA POR 
ORDENADOR 



La aparición del standar MSX 
suscitó en su momento excelen- 
tes espectativas para el desarro- 
llo de Software educativo, pues- 
to que varias circunstancias ava- 
laban esta posibilidad. 



Efectivamente, el precio de los 
equipos, el conocimiento de su 
microprocesador Z 80A, y el 
segmento de mercado a que iba desti- 
nado eran buenos argumentos para de- 
cidir a las Empresas de Soft, especiali- 
zadas en temas educativos, a ofrecer al 
público unas ofertas interesantes. En 
un mercado como el español cuyas po- 
sibilidades de consumo son ajustadas, 
se tenía que contar con el apoyo decidi- 
do de los fabricantes de Hard y sus re- 
des de comercialización. 

Hoy podemos asegurar que estas es- 
pectativas si bien no se han cumplido 
en su totalidad, si que, el menos, se han 
cubierto en parte. 

JdeMSXdis- 



span 



la ofer 



Soft educativo más amplia del merca- 
do. Cien títulos de Soft EAO (Ense- 
ñanza Asistida por ordenador), figuran 
en el Catálogo de Plusdata, el más am- 
plio en cuanto a oferta, y donde se en- 
cuentran los programas EAO disponi- 
bles en el mercado para MSX. 

El usuario puede estar satisfecho y 
creemos que aquellas escuelas o parti- 
culares que confiaron en el Standar 
MSX se encuentran con una oferta am- 
plia, que va desde programas de Prees- 
colar hasta Bup y con temas de lengua- 
je, C. Naturales, Matemáticas, Socia- 
les, Cursos de Basic, de Inglés, etc. 

Las Soft-House hubieran deseado 
una mayor colaboración de los fabri- 
cantes. No obstante empresas como 
Sony han hecho un excelente esfuerzo 
al aportar numerosos títulos al merca 
do. 

Soft-Houses como Plusdata e Idea, 
logic han aportado al mercado títulos 
muy interesantes; prácticamente la 
yoría de los 100 títulos mencionados 
anteriormente se reparten entre pro 
ductos de estas tres Empresas citadas. 

Por último cabe destacar que el pú 
blico en general; el usuario particular, 
no tiene a veces conocimiento de estos 
productos de Soft educativo por defi- 
ciencias o limitaciones de los Sistemas 




de distribución de las Soft-House. 
Aquí los fabricantes podrían jugar un 
papel más determinante para su mejor 
difusión. Otra circunstancia que incide 
en la poca demanda por parte del pú- 
blico es que, en un principio, se le ofre- 
cieron productos que amparados como 
EAO dejaban mucho que desear. Hoy 
la calidad del Soft educativo es exce- 
lente y de gran nivel. 



La Escuela, el Soft educativo 

La rápida evolución y expansión de 
la informática en la sociedad actual, su 
implantación en los distintos sectores 
industriales, profesionales, comercia- 
les, etc., e incluso en el hogar, conlleva 
unos cambios en todos los niveles edu- 
cativos y en los planteamientos peda- 
gógicos de la educación a los que la es- 

permite la conexión simultánea de hasta J0 apa- 
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ENTRA 
EN LA 

AVENTURA 
CORRE 
A TODA 

PASTILLA 



cuela no puede ser ajena. Introducir la 
informática en la escuela es una impe- 
riosa necesidad a la que nos obliga la 
evolución del entorno social, industrial 
y tecnológico. 

Aunque el proyecto ATENEA y 
otras medidas o proyectos similares de 
las Comunidades autónomas han im- 
pulsado o mejor dicho "introducido" 
el ordenador en las aulas, a pesar que la 
escuela privada está también introdu- 
ciendo el ordenador en la enseñanza, la 
conclusión actual es que la informática 
y las posibilidades pedagógicas que 
ofrece el ordenador no se utilizan en la 
forma debida, en muchas ocasiones 
por una mala orientación desde orga- 
nismos oficiales tanto estatales como 
autónomos. 

La Escuela, al incorporar ordenado- 
res, debe tener en cuenta las siguientes 
leyes: 

- Equipos estándar y adecuados a 
cada nivel (MSXoPC'ST 

- MSX hasta EGB 

- PC'S en BUP, COU y hacia arriba 

- Disponer de programas adecuados 
para cada nivel y cada materia 

- Enseñanza asistida por ordenador 




para las materias de texto, y para to- 
dos los alumnos del centro 

- Enseñanza de Logo, Basic y paque- 
tes integrados, según nivel de los 
alumnos interesados en ello. 

No obstante, desde ciertos estamen- 
tos oficiales, se ha pretendido que la es- 
cuela desarrolle sus propios programas 
educativos y que los profesores de 
claustro se formen en informática para 
elaborarlos ellos mismos. Lógicamente 
eUo ha conducido a una infra-utiliza- 
ción de los equipos y a que los alumnos 
no puedan en muchos casos beneficiar- 
se de las ventajas de trabajar con bue- 
nos programas de Enseñanza Asistida 
desarrollados por empresas especiali- 
zadas. 

Ventajas del Soft educativo 

Los programas de EAO ofrecen 
unas enormes ventajas, de las que el 
primer beneficiario es el alumno. En la 
escuela se utilizan para trabajar en for- 
maántensiva y a la vez amena y relajada 
temas importantes de Matemáticas, 
Sociales, Lenguaje o cualquier otra ma- 
teria como complemento a las explica- 
ciones del profesor. Plusdata ha com- 
probado que el rendimiento de los 
ajumnos de los centros (más de 5.000 

utilizan estos programas ha mejorado 
considerablemente. El alumno mejora 
sus capacidades cognitivas; mejora la 
atención, la lógica, el sentido común, la 
organización, la meticulosidad, y au- 
menta el rendimiento. 

Por otra parte los programas EAO 
son un elemento básico en las clases de 
repaso, ya que en el hogar para mejorar 
puntos o materias débiles, el alumno 
puede estudiar el tema a fondo las ve- 
ces que crea convenientes, el programa 
le evalúa y le corrige. Vemos pues una 
doble función o posibilidad: 

- en la escuela como complemento y 
ayuda al profesor. 

- en el hogar como repaso y trabajo 
con aquellos temas que creamos ne- 



Otra posibilidad de gran desarrollo 
en el futuro son los cursos a distancia, 
ya que la ventaja de utilizar el ordena- 
dor como un auténtico profesor impli- 
ca unas enormes perspectivas. 

Los programas EAO 

Al hablar de Software educativo, 
Enseñanza asistida por ordenador y 
programas EAO, el usuario puede du- 
dar sobre sus características y funcio- 
nalidad. Trataremos pues de hacer una 
clasificación, con los riesgos que ello 
supone. 




Otro juego sensacional de 
MANHATTAN TRANSFER, S. A. 





MSX Y EL SOFT EDUCATIVO. 



Hoy en el mercado podemo dispo- 
ner de los siguientes tipos de progra- 
mas EAO: 

- Programas sobre temas específicos 

Por ejemplo: 
Geografía de Europa 
Ecuaciones 
Análisis morfológico 
CálcuJo mental 
Temas de Física 

- Programas rutoriales 
Por ejemplo: 

Sobre el manejo de una hoja de 

Sobre las características de un 
ordenador 

- Cursos completos autodidactas 

Por ejemplo: 
de Basic 
Cobol 
Pascal 

Contabilidad 
Inglés, etc. 

- Programas de simulación 

Por ejemplo: 

De estrategia de Márketing o 

Empresariales 

De prácticas contables 

De fenómenos físicos 

De pruebas de laboratorio 
Básicamente con estas cuatro defini- 
ciones podemos englobar los diferen- 
tes tipos de programas a los que se cali- 
fica como EAO. 



Características de un buen Soft 
EAO 

En el mercado han aparecido des- 
graciadamente malos programas de 



EAO, -como han aparecido malos 
programas de Contabilidad-, pero ello 
tiene la ventaja para el usuario de que al 
menos sabe que es lo que no sirve (es- 
carnio pecuniario aparte). 

¿Qué condiciones o características 
debe reunir un buen programa educa- 
tivo? Esta es la pregunta que tratare- 
mos de contestar. 

Ante todo debemos evitar convertir 
el ordenador en libro, en una pantalla 
que pasa páginas del libro explicando 
textos. Un buen programa EAO debe: 

- Ser en su PARTE EXPLICATIVA 
claro, utilizando las posibilidades 
del ordenador 

- Debe ser por lo tanto, GRAFICO, 
remarcando aquellos puntos más in- 
teresantes o importantes 

- INTERACTIVO, debe mantener un 
diálogo constante con el usuario a 
fin de poder: 

- EVALUAR, corregir, enseñar al 
alumno y adaptarse a su nivel 

- Debe contemplar la posibilidad de 
varios niveles de dificultad adapta- 
bles al nivel del alumno. 

- INFORMATIVO para el profesor y 
alumno de los progresos alcanzados. 

£1 futuro del Soft EAO para 
MSX. Nuevas perspectivas 

A pesar de la deserción de fabrican- 
tes MSX, lo cual se va a demostrar muy 
posiblemente positivo para el merca 
do, las perspectivas son excelentes, er 
cuanto a posibilidades técnicas. Las ca 
racterísticas gráficas de los MSX sor 
extraordinarias, y para el Soft educati 
vo -que entre sus cualidades debe reu 



POR SOLO 800 PTAS. 




nir la del grafismo- es una excelente 
herramienta que las empresas de Soft 
se alegran de poseer. Las posibilidades 
que brindan en cuanto a la digitaliza- 
ción de imágenes son también extraor- 
dinarias, ya que brindan afcSoft las ven- 
tajas del vídeo y potencian las posibili- 
dades de interacción. 

El CD. Rom, abre igualmente unas 
perspectivas amplísimas de resultados 
cercanos. Pensamos que si los fabri- 
cantes apoyan a las casas de Soft EAO 



en cuanto a facilitar una mayor difu- 
sión de sus productos los resultados se- 
rán de alta calidad, en caso contrario, 
quizá las Soft Houses se vuelquen a 
otros standars. 

Obviamente MSX 2 abre un camino 
de grandes posibilidades, no obstante 
si Ud. aquirió un MSX 1 piense que 
acertó y hoy puede: 

- Enseñar a sus hijos a sumar, restar, 
multiplicar, dividir 

- Enseñar a sus hijos mayores, ecua- 



ciones, física o geografía de Europa. 

- Hacer prácticas contables. 

- Seguir cursos de inglés o basic. 

- Dibujar con excelentes programas 
de gráficos. 

Todo ello con programas EAO, para 
MSX y desarrollado por empresas na- 
cionales; sus posibilidades son am- 
plias. 

Josep Antón 
Gerente de Plusdata, S.A. 




N.' 22-23- 350 PT AS. N.° 24 - 225 PTAS. 



N.°25 225 PTAS. 



¡SI TE HAGE FALTA ALGUN NUMERO DE 



PIDELO HOY MISMO! 



Para contar con la más completa colección de programas de MSX sólo tienes que recortar o fotocopiar el cu- 
pón y dirigirlo a Dpto. Suscripciones MSX CLUB DE PROGRAMAS. Roca i Batlle, 10-12. 08023 Barcelona. 

I BOLETIN DE PEDIDO . 

. Sí, deseo recibir hoy mismo los números de MSX CLUB DE PROGRAMAS, libre de 

I gastos de envío, por lo que adjunto talón n.° del Banco/Caja I 

I por el importe de ptas. a nombre de MANHATTAN TRANSFER, S.A. 1 

I NOMBRE Y APELLIDOS I 

i CALLE N.° CIUDAD 41 , 

, DP PROVINCIA TEL ! 
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¡SIN BOMBOS NI PLATILLOS! 



La editorial Manhattan Transfer, S.A. 
Se gana a pulso la confianza del lector. 
Cada una de sus publicaciones tienen el 
objetivo específico de servir al lector/usuario. 



MANHATTAN 
TRANSFER, S.A. 

No se limita a 
llenar páginas 
las llena de contenido 
A la vanguardia de la prensa útil 




CP COMPACT - PCompatible - MSX Extra - MSX Club de Programas 



I 4J 



JU£GO$ INURACTIVOS «|| 




